Modify multiple registry keys using vbscript

Hello,

I’m looking for a way to modify some existing registry keys using vbscript. I've figured out how to change one, but am having trouble figuring out to change multiple values. I’d like the registry changes mentioned at the bottom to happen when a user clicks on the YES button on my messagebox.

So far my script looks like this.

Dim wshShell, Response

Response = msgbox("WARNING - You need the latest updates."_
 & vbcrlf & vbcrlf & "Please click YES to install these updates now."_
 & vbcrlf & vbcrlf & "Press NO to temporarily suppress this message."_  
  & vbcrlf & vbcrlf & "Please call the Helpdesk if you have any problems or questions."_
, 52, "IMPORTANT - Please read before continuing.")
if response = vbyes then

'Do this action if they click YES
‘Put registry changes here

Set wshShell = Nothing
end if


[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon]

[HKEY_LOCAL_MACHINE\SOFTWARE\Novell\NWGINA\Welcome Screen]
"Bitmap"="Updates.BMP"
"Header Message"="Updates are installing..."

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Kbdclass]
"Start"=dword:00000004