Page 1 sur 1
[R] Audit de Poste
Posté : mar. 20 mars 2012 11:13
par Blevanaks
Bonjour
J'aurai d'aide sur le code ci-dessous quand je le compile et l'exécute dans autoit je n'ai pas d'erreur, cependant quand j'exécute l'exe j'obtiens cette erreur : "Error: Array variable has incorrect number of subscripts or subscript dimension range exceeded"
Merci pour votre aide
Julien
Re: [...] Audit de Poste
Posté : mar. 20 mars 2012 11:34
par Blevanaks
A priori l'erreur se trouve dans ces lignes ! une idée ?
Code : Tout sélectionner
If UBound($NACDNSServer) > 0 Then
If $NACDNSServer[0] = "" Then
; Do Nothing
Else
FileWrite($Report, '<span style="display: inline-block; margin-left: 20px; width: 100px;">DNS Server 1:</span><span style="display: inline-block; margin-left: 20px; width: 300px;">' & $NACDNSServer[0] & '</span><br />')
If $NACDNSServer[1] = "" Then
FileWrite($Report, '<br />' & @CRLF)
Else
FileWrite($Report, @CRLF & '<span style="display: inline-block; margin-left: 20px; width: 100px;">DNS Server 2:</span><span style="display: inline-block; margin-left: 20px; width: 300px;">' & $NACDNSServer[1] & '</span><br />' & @CRLF)
EndIf
EndIf
EndIf
Re: [...] Audit de Poste
Posté : mar. 20 mars 2012 12:00
par ZDS
Bonjour,
Une première correction grossière serait de changer la première ligne du bloc de code que tu as présenté, car si tu testes $NACDNSServer[0] et $NACDNSServer[1], c'est que ton tableau est au moins de taille 2, donc :
"If UBound($NACDNSServer) > 0 Then" est une erreur : à remplacer par "If UBound($NACDNSServer) > 1 Then" ou par "If UBound($NACDNSServer) >= 2 Then" pour plus de clarté.
Après, dans ton algo sur ce bloc de code, tu peux aussi faire :
► Afficher le texteseconde correction possible
Code : Tout sélectionner
If UBound($NACDNSServer) >= 1 Then
If $NACDNSServer[0] = "" Then
; Do Nothing
Else
FileWrite($Report, '<span style="display: inline-block; margin-left: 20px; width: 100px;">DNS Server 1:</span><span style="display: inline-block; margin-left: 20px; width: 300px;">' & $NACDNSServer[0] & '</span><br />')
If UBound($NACDNSServer) >= 2 Then
If $NACDNSServer[1] = "" Then
FileWrite($Report, '<br />' & @CRLF)
Else
FileWrite($Report, @CRLF & '<span style="display: inline-block; margin-left: 20px; width: 100px;">DNS Server 2:</span><span style="display: inline-block; margin-left: 20px; width: 300px;">' & $NACDNSServer[1] & '</span><br />' & @CRLF)
EndIf
EndIf
EndIf
EndIf
mais je sais pas si c'est ce que tu souhaites.
Bonne chance, et à bientôt !
Re: [...] Audit de Poste
Posté : mar. 20 mars 2012 12:16
par Blevanaks
Re: [...] Audit de Poste
Posté : mar. 20 mars 2012 12:27
par karime1
N'oublie pas de changer le titre du sujet en [R]
Re: [..] Audit de Poste
Posté : mar. 20 mars 2012 15:38
par Blevanaks
j ai un petit soucis de nouveau ^^ voir image
Code : Tout sélectionner
; ----------------------------------------------------------------------------
; Right side - Main Circuit Board
; ----------------------------------------------------------------------------
GUICtrlSetData($Label, "Writing Motherboard Details to report")
GUICtrlSetData($Progress1, 0)
GUICtrlSetData($Percent1, "0%")
; ----------------------------------------------------------------------------
FileWrite($Report, '<div class="twobobsright">' & @CRLF)
FileWrite($Report, '<span class="secheader">Carte Mere</span><br/>' & @CRLF)
GUICtrlSetData($Progress1, 500)
GUICtrlSetData($Progress2, 70.0)
GUICtrlSetData($Percent1, "50%")
GUICtrlSetData($Percent2, "70.0%")
FileWrite($Report, 'Board: ' & $BBMManufacturer & ' ' & $BBMProduct & '<br />' & @CRLF)
FileWrite($Report, 'BIOS: ' & $BIOManufacturer & ' ' & $BIOVersion & ' ' & $BIORelDay & '/' & $BIORelMonth & '/' & $BIORelYear & '<br />' & @CRLF)
FileWrite($Report, '</div>' & @CRLF)
FileWrite($Report, '</div>' & @CRLF)
GUICtrlSetData($Progress1, 100)
GUICtrlSetData($Progress2, 72.0)
GUICtrlSetData($Percent1, "100%")
GUICtrlSetData($Percent2, "72.0%")
merci
Re: [..] Audit de Poste
Posté : mar. 20 mars 2012 15:52
par Laddy
Bonjour
déclares tes variables en haut de ton code
Global $BBMManufacturer , $BIOManufacturer , $BBMProduct , $BIOVersion , $Report
Re: [..] Audit de Poste
Posté : mar. 20 mars 2012 16:38
par Blevanaks
^^' merci
Re: [R] Audit de Poste
Posté : mer. 21 mars 2012 09:26
par ricky
Hello,
ton script a des informations intéressantes, mais regarde ce lien sur le forum anglais :
http://www.autoitscript.com/forum/topic ... olog-v123/
C'est un script très évolué, moi j'ai rajouté quelques fonctions pour mon propre usage, mais déjà celui fourni donne pas mal d'informations pertinentes. D'ailleurs je lui ai transmis quelques remarques et améliorations qu'il a pris en compte...
Donne moi ton avis...
