hallo.
Ik heb een probleem met een text editor die ik aan het schrijven ben om VB te leren..
ik gebruik hier visual studio 2005 voor.
de bedoeling is een Text/HTML/vbs/js editor als eind resultaat te hebben
dit lukt aardig. maar zit iets of wat vast.
ik zoek geen kant en klaar script enkel goede tips of links waar ik info hierover kan vinden.
ik heb google zowat uitgemolken maar helaas :shocked:
ik heb 2 Radiobuttons(HTML/vbs) en een Live Knop(deze slaat het tijdelijke TEST bestand op)
dit is de code die ik hiervoor gebruik
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
If RadioButton1.Checked = True Then
My.Computer.FileSystem.WriteAllText("C:\Test.htm", String.Empty, False)
My.Computer.FileSystem.WriteAllText("C:\Test.htm", TextBox1.Text, True)
Dim result As Long
myfile = "C:\Test.htm"
result = Shell("c:\program files\internet explorer\iexplore.exe " & myfile, vbNormalFocus)
End If
If RadioButton2.Checked = True Then
My.Computer.FileSystem.WriteAllText("C:\Temp\Test.vbs", TextBox1.Text, True)
Dim result As Long
myfile = "C:\Temp\Test.vbs"
result = Shell(myfile, vbNormalFocus)
End If
End Sub
Dit is mijn probleem
ik probeer de inhoud van TextBox1 op te slaan als C:\Temp\Test.vbs en deze uiteindelijk te laten draaien... het opslaan als een .vbs lukt maar krijg een fout melding wanneer ik dit scriptje laat draaien.
ik gebruik een simpel voorbeeld:
Invoer TexBox1 : WScript.Echo"Dit is het opgeslagen vbscriptje"
Word opgeslagen als C:\Temp\Test.vbs
wanneer ik dit scriptje uitvoer krijg ik deze FoutMelding:
Script C:\Temp\Test.vbs:
Regel: 1
Teken: 1
Fout: : Ongeldig teken
Code: 800A0408
Bron: Compilatiefout Microsoft VBScript
als ik dan de broncode van het scriptje bekijk staat er : WScript.Echo"Dit is het opgeslagen vbscriptje"
Kan iemand me hier aub mee helpen.
Met vriendelijke groet
Marco
Ik heb een probleem met een text editor die ik aan het schrijven ben om VB te leren..
ik gebruik hier visual studio 2005 voor.
de bedoeling is een Text/HTML/vbs/js editor als eind resultaat te hebben
dit lukt aardig. maar zit iets of wat vast.
ik zoek geen kant en klaar script enkel goede tips of links waar ik info hierover kan vinden.
ik heb google zowat uitgemolken maar helaas :shocked:
ik heb 2 Radiobuttons(HTML/vbs) en een Live Knop(deze slaat het tijdelijke TEST bestand op)
dit is de code die ik hiervoor gebruik
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
If RadioButton1.Checked = True Then
My.Computer.FileSystem.WriteAllText("C:\Test.htm", String.Empty, False)
My.Computer.FileSystem.WriteAllText("C:\Test.htm", TextBox1.Text, True)
Dim result As Long
myfile = "C:\Test.htm"
result = Shell("c:\program files\internet explorer\iexplore.exe " & myfile, vbNormalFocus)
End If
If RadioButton2.Checked = True Then
My.Computer.FileSystem.WriteAllText("C:\Temp\Test.vbs", TextBox1.Text, True)
Dim result As Long
myfile = "C:\Temp\Test.vbs"
result = Shell(myfile, vbNormalFocus)
End If
End Sub
Dit is mijn probleem
ik probeer de inhoud van TextBox1 op te slaan als C:\Temp\Test.vbs en deze uiteindelijk te laten draaien... het opslaan als een .vbs lukt maar krijg een fout melding wanneer ik dit scriptje laat draaien.
ik gebruik een simpel voorbeeld:
Invoer TexBox1 : WScript.Echo"Dit is het opgeslagen vbscriptje"
Word opgeslagen als C:\Temp\Test.vbs
wanneer ik dit scriptje uitvoer krijg ik deze FoutMelding:
Script C:\Temp\Test.vbs:
Regel: 1
Teken: 1
Fout: : Ongeldig teken
Code: 800A0408
Bron: Compilatiefout Microsoft VBScript
als ik dan de broncode van het scriptje bekijk staat er : WScript.Echo"Dit is het opgeslagen vbscriptje"
Kan iemand me hier aub mee helpen.
Met vriendelijke groet
Marco
erfect gecodeerd VBScriptje) opsloeg met de extentie ".vbs" kreeg ik die bewuste foutmelding. dit is geen exe file (de fout melding kwam trouwens niet van de editor zelf maar van het gegenereerde vbscriptje.. dat werd duidelijk nadat ik de applicatie aangepast had zodat het het scriptje niet meer automatisch uitgevoerde maar het enkel opgesloeg. om vervolgens zelf het scriptje te gaan voorzien van een dubbele klik.
