How do I create a pop-up box

[plshelpme]

Hey.

I'm trying to get my website to put up a message box for which the user has to click OK before being re-routed to a new site.

I have tried msgbox using VBScript, but i can not get the box to display at all, the site just re-routes. I also tried to get the site to delay before re-routing using:

dim timestart
timestart = FormatDateTime(Now, vbShortTime)
dim timeend
timeend = timestart + "100"
Do While timestart > timeend 
	timestart = FormatDateTime(Now, vbShortTime)
Loop
Response.Redirect("thenewsite")

...but still no message box, and no noticible delay either.

anyone??