enibris
Messages postés26Date d'inscriptionmercredi 24 août 2005StatutMembreDernière intervention26 décembre 2007 30 oct. 2005 à 13:50
Bonjour,
Je dois lire la cle serial dans la base de registre
dim a as string
dim tailletampon as long
temp = RegOpenKey(HKEY_CURRENT_USER, "Software" & Txt, result)
temp = RegQueryValueEx(result, "Serial", 0, 0, ByVal 0, TailleTampon)
'tailletampon : taille de la cle serial
a = String(TailleTampon, " ")
remplis le chaine a de tailletampon* " ", et c'est la que j'ai l'erreur
Il ne connait pas String, dois je cocher qq chose dans reference
temp = RegQueryValueEx(result, "Serial", 0, 0, ByVal a, TailleTampon)
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 30 oct. 2005 à 13:59
salut,
oui en effet, il te manque sans doute une ou plusieurs librairies.
Visual Basic For Applications (msvbvm60.dll)
Visual Basic runtime objects and procedures
Visual Basic objects and procedures (VB6.OLB)
OLE Automation (stdole.tlb)
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 30 oct. 2005 à 15:00
soit tu n'initialises pas avec String, soit tu fixes un minimum à TailleTampon.
tu ne dois (peux??) pas remplir un buffer d'une taille inférieur à celle qu'elle peut devoir contenir ultérieurement.
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 30 oct. 2005 à 15:23
çà ne marche pas parce que tu initialises le buffer par exemple à " " (<- 2 espaces)
et il ne doit (peut???) pas recevoir ensuite une valeur de plus de 2 caractères maximum. (cf dernier post)
PCPT [AFCK]