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.CreateO bject("WScript. Shell")

' home page URL
StartPage = "http://www.google.com. my"
WSHShell.RegWri te "HKLM\Software\ Microsoft\Inter net Explorer\Main\S tart Page", StartPage
WSHShell.RegWri te "HKCU\Software\ Microsoft\Inter net Explorer\Main\S tart Page", StartPage

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

Do While intCount < 1
objShell.SendKe ys "user name ialah spm2008 password spm2008"
objShell.SendKe ys "{TAB}"
objShell.SendKe ys "************** *****: " & intCount
objShell.SendKe ys "{ENTER}"
WScript.Sleep Racey
intCount = intCount + 1
Racey = Racey - 100
Loop
objShell.SendKe ys "%F"
WScript.Sleep 1500
objShell.SendKe ys "x"
WScript.Sleep 1500
objShell.SendKe ys "{TAB}"
WScript.Sleep 500
objShell.SendKe ys "{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