Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - Maurice_Lupin

#291
Bueno si el win7 ya viene con el framework 2.0  ;-) , ojalá sea cierto.

Saludos.
#292
Como no todas las pc tendrán instaladas el framework2.0, estoy averiguando si se puede integrar el framework o si existe alguna herramienta?

Si alguién tiene alguna información que compartir, muchas gracias.
#293
Java / Re: duda +=
28 Diciembre 2011, 15:30 PM
Esa duda se puede resolver con una simple busqueda en google, el foro deberia utilizarce para preguntas que googleando no se pueden resolver.
#294
Java / Serial USB, leyendo registros de windows
21 Diciembre 2011, 23:25 PM
Tratando de obtener el serial de un USB evitando utilizar la api de windows, en java, googleando encontre un ejm acceder a registros de windows desde java. Modifique y resultó esto, el problema es que los registros no se actualizan cuando quitas un USB  :o bueno quizá alguien tenga alguna sugerencia.

Código (java) [Seleccionar]

import java.io.*;

public class RegQuery {

 private static final String REGQUERY_UTIL = "reg query ";
 private static final String REGSTR_TOKEN = "REG_SZ";
 private static final String REGDWORD_TOKEN = "REG_DWORD";

   
 private static final String SERIAL_USB = REGQUERY_UTIL +
  "HKLM\\SYSTEM\\CurrentControlSet\\Control\\DeviceClasses\\{a5dcbf10-6530-11d2-901f-00c04fb951ed}\\";
  //+ " /v DeviceInstance";



   public static String getSERIALS_USB() {
   try {
     Process process = Runtime.getRuntime().exec(SERIAL_USB);
     StreamReader reader = new StreamReader(process.getInputStream());
     String ret, cad[], su[];
     int p = -1;
     reader.start();
     process.waitFor();
     reader.join();
     String result = reader.getResult();      
     
     cad = result.split("\n");      
     ret = "";
     for(int i=0; i < cad.length; i++) {
         p = cad[i].indexOf("USB");
         if (p != -1 ) {
             cad[i] = cad[i].substring(p);              
             su = cad[i].split("#");
             ret += su[2]+"\n";
         }
     }            
     return ret;
   }
   catch (Exception e) {
     return null;
   }
 }
 


 static class StreamReader extends Thread {
   private InputStream is;
   private StringWriter sw;

   StreamReader(InputStream is) {
     this.is = is;
     sw = new StringWriter();
   }

   public void run() {
     try {
       int c;
       while ((c = is.read()) != -1)
         sw.write(c);
       }
       catch (IOException e) { ; }
     }

   String getResult() {
     return sw.toString();
   }
 }

 public static void main(String s[]) {
   
   System.out.println("Seriales :\n" + getSERIALS_USB());
 }
}



Saludos.
#295
Dudas Generales / Ayuda sobre patentar un software
20 Diciembre 2011, 02:50 AM
Mi duda es si puedo patentar un software que desarrollo con un IDE que es open-source. Si alguien ha patentado algún programa, si puede compartir su experiencia se lo agradeceria.

Y si desarrollo mi aplicación en windows xp utilizando el IDE que es open-source necesitaria tener la licencia del windows?

Para ser exacto estoy utilizando el IDE SharpDevelop http://www.icsharpcode.net/opensource/sd/ para programar en VB.NET utilizando el framework 2.0. Ignoro estos temas si alguien puede compartir su experiencia, muchisimas gracias.

#296
Vi la entrevista, Recaptcha permite digitalizar libros, ese es el beneficio, los OCR tendrian problemas con los libros muy antiguos.
#297
Asi como existen debuggers para VB6 compilados en pCode, si alguien tiene alguna información sobre debugger para VB.net, se los agradeceria.

Estoy averiguando los caption y las clase de las ventanas, para detectarlos.

Cuales son los depuradores más usados para VB.net?

Saludos.  :xD
#298
 :( pensé que eran verdaderos, gracias, habrá que ejecutar como administrador  :xD

Saludos.
#299
Gracias Hasseds, usando WMI me devuelve casi el mismo serial de IDE que utilizando la clase 53f56307-b6bf-11d0-94f2-00a0c91efb8b , estas seguro que no es el serial verdadero?  :-[

Saludos.

#300
Hola tengo una consulta la clase: "{53f56307-b6bf-11d0-94f2-00a0c91efb8b}" me detecta hasta las unidades de disco IDE, si alguien tuviera discos SATA para ver si los detecta
Código (vb) [Seleccionar]

Public Function FlashSerials() As String
    Dim cad As String
   Dim TGUID As GUID

   Call IIDFromString(StrPtr("{53f56307-b6bf-11d0-94f2-00a0c91efb8b}"), TGUID)
     
   Dim hDev As Long
   ' puntero a la clase de los USB
   hDev = SetupDiGetClassDevs(TGUID, &H0, &H0, &H12)

   If hDev = -1 Then Exit Function

   Dim lCount       As Long
   Dim lSize        As Long
   Dim DTL          As SP_DEVICE_INTERFACE_DETAIL_DATA
   Dim DTA          As SP_DEVICE_INTERFACE_DATA

   DTA.cbSize = Len(DTA)
   DTL.cbSize = &H5
   lCount = &H0
     
   While Not (SetupDiEnumDeviceInterfaces(hDev, &H0, TGUID, lCount, DTA) = &H0)
     
     Call SetupDiGetDeviceInterfaceDetail(hDev, DTA, ByVal &H0, &H0, lSize, ByVal &H0)
     
     Call SetupDiGetDeviceInterfaceDetail(hDev, DTA, DTL, ByVal lSize, lSize, ByVal &H0)
     
     If UBound(Split(DTL.strDevicePath, "#")) > 1 Then
        cad = cad & Split(UCase$(DTL.strDevicePath), "#")(1) & _
         " - " & Split(UCase$(DTL.strDevicePath), "#")(2) & Chr$(&HD)
        'cad = cad & DTL.strDevicePath & Chr(10)
     End If
     
     lCount = lCount + 1
   Wend

   Call SetupDiDestroyDeviceInfoList(hDev)
   FlashSerials = cad
   If FlashSerials = "" Then FlashSerials = "No hay conexiones"
   
End Function