[VBS] Voorbeeld script werkt niet.

Pagina: 1
Acties:
  • 998 views sinds 30-01-2008

Acties:
  • 0 Henk 'm!

Anoniem: 111246

Topicstarter
Het volgende voorbeeld komt van de Microsoft website:
http://msdn2.microsoft.co...rary/cy6azwf7(VS.80).aspx

code:
1
2
3
4
My.Computer.Registry.CurrentUser.CreateSubKey("MyTestKey")
' Change MyTestKeyValue to This is a test value. 
My.Computer.Registry.SetValue("HKEY_CURRENT_USER\MyTestKey", _
"MyTestKeyValue", "This is a test value.")


Echter wanneer ik deze regels code in een .vbs bestand plak krijg ik telkens de melding:

code:
1
2
3
4
5
Regel: 4
Teken: 43
Fout: Kan geen aanhalingstekens gebruiken bij het aanroepen van een Sub-waarde
Code: 800A0414
Bron: Compilatiefout Microsoft VBScript


Heb al geprobeerd om er dit van te maken (2 regels):

code:
1
2
My.Computer.Registry.CurrentUser.CreateSubKey("MyTestKey")
My.Computer.Registry.SetValue("HKEY_CURRENT_USER\MyTestKey", _"MyTestKeyValue", "This is a test value.")


Maar dan krijg ik de melding:

code:
1
2
3
4
5
Regel: 2
Teken: 64
Fout: Ongeldig teken
Code: 800A0408
Bron: Compilatiefout Microsoft VBScript


Ook al geprobeerd om de code handmatig over te tikken omdat er wellicht verborgen tekens in zouden zitten die het veroorzaken.
Rechten issue is het ook niet daar ik local admin ben op de bak waarop ik dit aan het testen ben.

In iedergeval ben ik me er blind op aan het staren, heeft iemand een suggestie wat het probleem zou kunnen zijn?

Acties:
  • 0 Henk 'm!

  • CodeCaster
  • Registratie: Juni 2003
  • Niet online

CodeCaster

Can I get uhm...

Je moet de underscore weghalen bij het tweede voorbeeld.

https://oneerlijkewoz.nl
Het ergste moet nog komen / Het leven is een straf / Een uitgestrekte kwelling van de wieg tot aan het graf


Acties:
  • 0 Henk 'm!

  • RobIII
  • Registratie: December 2001
  • Niet online

RobIII

Admin Devschuur®

^ Romeinse Ⅲ ja!

(overleden)
Lees de foutmelding eens goed en kijk eens naar het regelnummer en teken ;)

code:
1
2
My.Computer.Registry.CurrentUser.CreateSubKey "MyTestKey"
My.Computer.Registry.SetValue "HKEY_CURRENT_USER\MyTestKey", "MyTestKeyValue", "This is a test value."


De code op de MS site is VB.Net en da's geen VBS ;)
De foutmelding gaat over de haken "CreateSubKey(blah)" en die vindt VBS niet leuk. Maar My.Computer.blah is ook niets wat je in VBS kunt gebruiken.

[ Voor 30% gewijzigd door RobIII op 10-09-2007 11:48 ]

There are only two hard problems in distributed systems: 2. Exactly-once delivery 1. Guaranteed order of messages 2. Exactly-once delivery.

Je eigen tweaker.me redirect

Over mij


Acties:
  • 0 Henk 'm!

Anoniem: 111246

Topicstarter
Zo dus?
code:
1
2
My.Computer.Registry.CurrentUser.CreateSubKey("MyTestKey")
My.Computer.Registry.SetValue ("HKEY_CURRENT_USER\MyTestKey", "MyTestKeyValue", "This is a test value.")


dan krijg ik de volgende melding:

code:
1
2
3
4
5
Regel: 2
Teken: 105
Fout: Kan geen aanhalingstekens gebruiken bij het aanroepen van een Sub-waarde
Code: 800A0414
Bron: Compilatiefout Microsoft VBScript

Acties:
  • 0 Henk 'm!

  • whoami
  • Registratie: December 2000
  • Laatst online: 11:38
Wat Rob zegt; die voorbeeld-code is geen VBScript code.

Verder heeft dit ook niets met DT&E te maken.

https://fgheysels.github.io/


Dit topic is gesloten.