07/01/10 14:19
Devil_Joker93
Ciao ha tutti sto creando un generatore di msgbox, ma il problema e che dovrebbe scriverli in un file vbs, Tutto Ok ma il problema è che gli scrive in modo errato, ecco il codice del programma:
Private Sub XPButton9_Click()
Open ("C:\MsgBox.vbs" For Append As #1
If XPOption3.Value = True Then
Print #1, "MsgBox" + XPText2.Text, 64, XPText1.Text
End If
If XPOption1.Value = True Then
Print #1, "MsgBox" + XPText2.Text, 16, XPText1.Text
End If
If XPOption2.Value = True Then
Print #1, "MsgBox" + XPText2.Text, 48, XPText1.Text
End If
Close #1
End Sub
Ecco cosa mi scrive (per esempio) nel file vbs:
MsgBox Aggiornamento Installato Correttamente 64 Informazione
Invece per funzionare dovrebbe scriverlo così:
Msgbox "Aggiornamento Installato Correttamente",64,Informazione
Sapete aiutarmi ?
Grazie
By Devil_Joker93
Private Sub XPButton9_Click()
Open ("C:\MsgBox.vbs" For Append As #1
If XPOption3.Value = True Then
Print #1, "MsgBox" + XPText2.Text, 64, XPText1.Text
End If
If XPOption1.Value = True Then
Print #1, "MsgBox" + XPText2.Text, 16, XPText1.Text
End If
If XPOption2.Value = True Then
Print #1, "MsgBox" + XPText2.Text, 48, XPText1.Text
End If
Close #1
End Sub
Ecco cosa mi scrive (per esempio) nel file vbs:
MsgBox Aggiornamento Installato Correttamente 64 Informazione
Invece per funzionare dovrebbe scriverlo così:
Msgbox "Aggiornamento Installato Correttamente",64,Informazione
Sapete aiutarmi ?
Grazie
By Devil_Joker93
aaa