vraag over batch file

[That Guy]

ohja
hahha, sorry, mijn fout ^^"

Error nummer 0 is eigenlijk geen error, maar error # 0 betekent "succes"

dus:

    Private functionfailsafe(ByVal bericht As String, ByRef cijfer As Integer, ByVal Xprocedure As String) 
'Vergeet niet een error-handler!
On error goto Hell
        Dim tempVar As String 
        Console.WriteLine(bericht) 
        tempVar = Console.ReadLine 
             If (val(tempVar) >= -2147483648) And (val(tempVar <= 2147483647) Then 
                 'Procedure that is executed when all creteria are met
                 cijfer = CInt(tempVar)
                 Shell Xprocedure[COLOR="seagreen"] 'shell voor het uitvoeren, Xprocedure is een variabele die is opgegven :)[/COLOR]             Else 
                    Main() 
                End If 

'errhand:
Hell:
if err.number <> 0 then[COLOR="SeaGreen"] 'err = niet # 0 :)[/COLOR]
msgbox "Error #" & err.number & ": " & err.description
end if
    End function

 

[bn2vs]

Ok, dat werkt beter ja