elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: AIO elhacker.NET 2021 Compilación herramientas análisis y desinfección malware


  Mostrar Mensajes
Páginas: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 [17] 18 19 20 21
161  Programación / .NET (C#, VB.NET, ASP) / Re: DUDA Ruta archivos en ejecución en: 5 Febrero 2014, 19:17 pm
Voy a implementarlo y comentarte como me va, MUCHAS GRACIAS.
162  Programación / .NET (C#, VB.NET, ASP) / DUDA Ruta archivos en ejecución[SOLUCIONADO] en: 5 Febrero 2014, 18:20 pm
Buenas,

He estado buscando en internet y lo que encuentro no me sustenta mucho, ¿alguno de ustedes sabe como obtener la ruta de un archivo en ejecución, pero que NO esté dentro del mismo folder que viene el debug del visual studio y que no sea la misma aplicación del programa que uno está creando?.

En pocas palabras, necesito obtener la ruta de un archivo que se está ejecutando, pero que no sea la misma aplicación que uno está programando, es en C#.

He estado utilizando
este código

Código
  1.  
  2. string logsDirectory = Path.Combine(Environment.CurrentDirectory, trozo2);
  3.  
  4.  

Pero lo que obtengo es la ruta donde está proyecto y es lo que NO necesito.

163  Programación / .NET (C#, VB.NET, ASP) / Re: Duda con "Win32_PrintJob" en: 3 Febrero 2014, 16:01 pm
¿Nadie sabe?, he estado buscando y hay varias personas con el mismo problema que yo y que no han podido solventarlo, les agradecería que si saben algo me ayuden.
164  Programación / .NET (C#, VB.NET, ASP) / Duda con "Win32_PrintJob" en: 1 Febrero 2014, 16:37 pm
Buenas,

He estado haciendo un tipo de monitoreo de impresoras, cuando el usuario imprime la cola de impresión me da las datos.

Pasa que cuando los pido, los datos de nombre, fecha y nombre del documento me dan lo que necesito, pero cuando trato de averiguar cuántas páginas tiene el documento el programa sólo me retorna 1 y en el caso de las páginas totales 0.

El programa lo estoy haciendo con Visual Studio 2010 y con C#.


Es importante aclarar que he probado con word y notepad, los cuáles se generan con más de 1 página.

Les agradecería si me pudieran ayudar con esto.


Código
  1.  
  2. System.Collections.ArrayList printJobCollection = new System.Collections.ArrayList();
  3.  
  4.        //Obtiene los trabajos que contiene en memoria.
  5.  
  6.        public System.Collections.ArrayList obtenerimpresiones(string PrinterName)
  7.        {
  8.  
  9.            string PrinterJobs = "SELECT * FROM Win32_PrintJob";
  10.            string hora;
  11.  
  12.            ManagementObjectSearcher FindPrintJobs = new ManagementObjectSearcher(PrinterJobs);
  13.            ManagementObjectCollection prntJobCollection = FindPrintJobs.Get();
  14.  
  15.            foreach (ManagementObject prntJob in prntJobCollection)
  16.            {
  17.  
  18.  
  19.                System.String jobName = prntJob.Properties["Name"].Value.ToString();
  20.                System.String pages = prntJob.Properties["PagesPrinted"].Value.ToString();
  21.                System.String print = prntJob.Properties["DriverName"].Value.ToString();
  22.                System.String totalpages = prntJob.Properties["TotalPages"].Value.ToString();
  23.  
  24.  
  25.  
  26.                hora = DateTime.Now.ToString();
  27.  
  28.  
  29.                char[] JobSplit = new char[1];
  30.  
  31.                JobSplit[0] = Convert.ToChar(",");
  32.  
  33.                string prnterName = jobName.Split(JobSplit)[0];
  34.  
  35.                string documentName = "Nombre del documento->" + prntJob.Properties["Document"].Value.ToString() + " Usuario->" + prntJob.Properties["owner"].Value.ToString() + " - Fecha->" + hora + " - Páginas del documento->" + pages + "- Impresora ->" + print + "Total páginas impresas->" + totalpages + "\n";
  36.  
  37.                if (String.Compare(prnterName, PrinterName, true) == 0)
  38.                {
  39.  
  40.                    printJobCollection.Add(documentName);
  41.  
  42.  
  43.                }
  44.  
  45.  
  46.            }
  47.  
  48.  
  49.            return printJobCollection;            
  50.  
  51.  
  52.  
  53.            }
  54.  
  55.  
  56.  
  57.  


165  Programación / .NET (C#, VB.NET, ASP) / Re: EXCEPCION, No se como resolverla, problema con EXCEL Y VB.NET[SOLUCIONADO] en: 22 Noviembre 2013, 15:49 pm
Genial!, gracias por el dato!.

Disculpas por lo del triple post, saludos.
166  Programación / .NET (C#, VB.NET, ASP) / Re: EXCEPCION, No se como resolverla, problema con EXCEL Y VB.NET[SOLUCIONADO] en: 21 Noviembre 2013, 23:01 pm
Gracias al fragmento que me pusiste ya logré como descifrarlo y pude resolverlo

Adjunto el código por si acaso alguien lo ocupa

GRACIAS!!


Código
  1.  
  2. Dim i As Integer = 0
  3.  
  4.        For Each sheet As Excel.Worksheet In xlWorkBook.Worksheets
  5.            Try
  6.  
  7.                'Verifica si está en la primera hoja para no borrarla.!
  8.                If i = 0 Or i = 1 Then
  9.  
  10.                    i = i + 1
  11.  
  12.                Else
  13.  
  14.                    'Sino simplemente la elimina.
  15.                    sheet.Delete()
  16.                    i = i + 1
  17.  
  18.                End If
  19.  
  20.            Catch ex As Exception
  21.                MsgBox(ex.Message & ex.StackTrace)
  22.            End Try
  23.        Next sheet
  24.  
  25.        'Elimina hoja sobrante
  26.        xlWorkBook.Sheets(2).delete()
  27.  
  28.  



167  Programación / .NET (C#, VB.NET, ASP) / Re: EXCEPCION, No se como resolverla, problema con EXCEL Y VB.NET en: 21 Noviembre 2013, 20:15 pm
Ok, si me sirvió pero, ¿Existe alguna manera de empezar en el segundo elemento en un for each?, el código funciona, y funciona tan bien que me salta una excepción porque me volé todas las hojas.


GRACIAS
168  Programación / .NET (C#, VB.NET, ASP) / Re: EXCEPCION, No se como resolverla, problema con EXCEL Y VB.NET en: 21 Noviembre 2013, 19:45 pm
Hola,

Agradezco que te hayas tomado el tiempo para leerme y responderme

Esta es la declaración de la variable

Código
  1.  
  2.  Dim contador As Integer = 0
  3.  

Acá dónde se "cae" el código
Código
  1. CType(xlWorkBook.Sheets(k), Excel.Worksheet).Delete()
  2.  

¿Para qué dos bucles? Bien, los utilizo para dos cosas:

1- Sacar la cantidad de hojas del libro(Bucle 1 o el primero que miras)
2- Realizar el delete.


El índice lo utilizo para que elimine todas las hojas a partir de la hoja 1, es por eso que necesito ponerle un índice.

Disculpa por la falta de esos detalles.

Intentaré lo que me dices, y te daré detalles!.

GRACIAS :D



169  Programación / .NET (C#, VB.NET, ASP) / Re: EXCEPCION, No se como resolverla, problema con EXCEL Y VB.NET[SOLUCIONADO] en: 21 Noviembre 2013, 17:39 pm
Hola,

Estoy realizando un limpiador de Excel, y tengo un problema de índices y desbordamientos.

Lo que quiero hacer es eliminar las hojas de un excel, dejando la primer hoja con sus datos, resulta que sólo puedo hacerlo individualmente de esta manera:

 CType(xlWorkBook.Sheets(i), Excel.Worksheet).Delete()

Pero cuando intento hacerlo con un ciclo salta esta excepción:

Invalid index. (Exception from HRESULT: 0x8002000B (DISP_E_BADINDEX))

Estoy utilizando VS 2010, Excel 2007, y este es el código que utilizo para eliminar las hojas. He realizado gran cantidad de intentos. Sinceramente no comprendo el porque del error.

Código
  1.  
  2. Dim contador As Integer = 0
  3.  
  4.        'Obtiene la cantidad de hojas a borrar
  5.        For Each sheet As Excel.Worksheet In xlWorkBook.Worksheets
  6.  
  7.            contador = contador + 1
  8.        Next
  9.  
  10.        'Contador
  11.        MsgBox(contador)
  12.  
  13.  
  14.  
  15.        For k = 0 To contador Step 1
  16.  
  17.            ' CType(xlApp.ActiveWorkbook.Sheets(i), Excel.Worksheet).Delete()
  18.            'xlWorkBook.Sheets(i).delete()
  19.  
  20.            If k = 0 Then
  21.  
  22.                ' k = k + 1
  23.            Else
  24.  
  25.                CType(xlWorkBook.Sheets(k), Excel.Worksheet).Delete()
  26.  
  27.                'xlWorkBook.Sheets(k).delete()
  28.                'k = k + 1
  29.                MsgBox(k)
  30.            End If
  31.        Next
  32.  
  33.  


No se si es porque se manejen los índices diferente en EXCEL y en VS, agradecería sus consejos.

Con respecto al for he probado varias formas de incrementos y nada tampoco, lo curioso es que se empieza a desbordar después de una cierta cantidad, con cantidades pequeñas funciona bien.

Agradezco de antemano la ayuda.

170  Informática / Software / Re: ¿Mejor software libre para administrar impresoras?. en: 31 Octubre 2013, 19:15 pm
Hola, se que no soy muy querido por acá, al menos intentaré dejar un aporte y agradecer las respuestas.

Ya encontré la solución.

http://www.papercut.com/products/free_software/print_logger/

Este es un log de las impresiones, licencia free.
Páginas: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 [17] 18 19 20 21
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines