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
|