need some help finishing this WSH VBS file!! not a virus :)

[loosbrew]

hey all, I figured it out up to here on my own....now theres just one things i cant seem to get to work correctly...well first the code..



<< L_Welcome_MsgBox_Message_Text = "This script will set the TIA Enviromental Variable."
L_Welcome_MsgBox_Title_Text = "TIA Environmental Variable"
Call Welcome

Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")


Dim val1
'
val1 = inputbox("Enter the TIA number")
'
msgbox "You entered " & val1


WSHShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment\" & "TIA"= val1
WSHShell.Popup "TIA Environmental Variable Set!"







' ***********************************************************************
' *
' * Welcome
' *
Sub Welcome()
Dim intDoIt
intDoIt = MsgBox(L_Welcome_MsgBox_Message_Text, vbOKCancel + vbInformation, L_Welcome_MsgBox_Title_Text)
If intDoIt = vbCancel Then
WScript.Quit
End If
End Sub

>>




now what i cant figure out is how to enter the input data for VAL1 as data for the HKLM/..../TIA key.


if anyone can help me , please have at it!!

tia
loosbrew

 

[loosbrew]

NM, figured it out

thanks anyways!!

loosbrew