Combining two VB files

[roslan]

Dear Friends

I am a newbies in VB.

I have two VB scripts which i would like to combine.

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

' home page URL
StartPage = "http://www.google.com.my"
WSHShell.RegWrite "HKLM\Software\Microsoft\Internet Explorer\Main\Start Page", StartPage
WSHShell.RegWrite "HKCU\Software\Microsoft\Internet Explorer\Main\Start Page", StartPage

Second
' SendKeys.vbs
' Example VBScript Run Notepad and use SendKeys
' Author Guy Thomas http://computerperformance.co.uk/
' Ezine 26 Version 1.8 - June 2005
' -----------------------------------------------------'
Option Explicit
Dim objShell, Racey, intCount
Set objShell = CreateObject("WScript.Shell")
objShell.Run "notepad"
Wscript.Sleep 1500
Racey = 1000
intCount=0

Do While intCount < 1
objShell.SendKeys "user name ialah spm2008 password spm2008"
objShell.SendKeys "{TAB}"
objShell.SendKeys "*******************: " & intCount
objShell.SendKeys "{ENTER}"
WScript.Sleep Racey
intCount = intCount + 1
Racey = Racey - 100
Loop
objShell.SendKeys "%F"
WScript.Sleep 1500
objShell.SendKeys "x"
WScript.Sleep 1500
objShell.SendKeys "{TAB}"
WScript.Sleep 500
objShell.SendKeys "{ENTER}"

WScript.Quit
' End of Example SendKeys VBScript


..

I also looking for VB Script which i can add in to my first file to lock the startpage .

Thanks for your valuable info.

Sincerely
Roslan