Comunidad de diseño web y desarrollo en internet online

leer numero de serie de dispositivo

Citar            
MensajeEscrito el 18 Dic 2009 12:17 am
Tengo un problema con la lectura del numero de serie del dispositivo con el objeto vbscript de MDM zinc, me devuelve el siguiente mensaje "Se esperaba un final de instruccion"

Os dejo el codigo para que me ayudeis:

Código :

var vbScript = 'Private Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String,_ \n';
vbScript += 'Function HDSerial() As String\n';
vbScript += 'Dim sDrv As String, sVolumeName As String, sSysName, SN As String\n';
vbScript += 'Dim iSerial, R, i As Int32\n';
vbScript += 'sDrv = "C:\" & ControlChars.NullChar\n';
vbScript += 'sVolumeName = New String(ControlChars.NullChar, 100)\n';
vbScript += 'sSysName = New String(ControlChars.NullChar, 100)\n';
vbScript += 'R = GetVolumeInformation(sDrv, sVolumeName, sVolumeName.Length, iSerial, 0, 0, sSysName, sSysName.Length)\n';
vbScript += 'SN = iSerial.ToString("X8")\n';
vbScript += 'Return SN.Substring(0, 4) & "-" & SN.Substring(4, 4)\n';
vbScript += 'End Function\n\n';
iserial = mdm.System.VBScript.execute(vbScript, "HDSerial", "", "", "", "", "");
mdm.Dialogs.prompt(iserial);

Por Bobosa

69 de clabLevel



 

msie
Citar            
MensajeEscrito el 23 Dic 2009 12:09 pm
En la clase System tienes el método "getHDSerial" que hace esta tarea.

Por elchininet

Claber

3921 de clabLevel

17 tutoriales

Genero:Masculino  

Front-end developer at Booking.com

firefox

 

Cristalab BabyBlue v4 + V4 © 2011 Cristalab
Powered by ClabEngines v4, HTML5, love and ponies.