How can i make delay time in my VB code?

I have a very simple VB code..But i need that working 'Mail.vbs' after 2min..

'-----------start-------------------------------------------------------------------------
Set objShell = CreateObject("Wscript.Shell")

YY=Mid(Year(Now),3)
M=Month(Now)
D=Day(Now)
H=Hour(Now)

If M < 10 Then
   MM = "0"&Month(Now)
Else
   MM = Month(Now)
 End If
 
 If D < 10 Then
   DD = "0"&Day(Now)-1
Else
   DD = Day(Now)-1
 End If

 If H < 10 Then
   HH = "0"&Hour(Now)
Else
   HH = Hour(Now)
 End If
 
Preday= YY&""&MM&""&DD

'WScript.echo Preday

objCommand = "LogParser ""Select [Date],[time],[cs-uri-stem],[cs-uri-query],[sc-status] into "&Preday&"_500error.log  From C:\Winnt\system32\Logfiles\W3SVC6\ex"&Preday&"*.log  where Sc-status=500  order by [Date] DESC"" -rtp:-1 -i:iisw3c"
objShell.Run(objCommand)

'-------------------------------------------------------------------------------------------------------------
This here, how can i make 2min sleep or delay?
Could you help me?
'-------------------------------------------------------------------------------------------------------------

Set oShell = WScript.CreateObject ("WSCript.shell")
oShell.Run "C:\LogParser2.2\Mail.vbs"

Set oShell = nothing
Set objShell = nothing  
'----------------------------------------- End ---------------------------------------------------------------Start Free Trial