redirect in 5 seconds?

Hi, how do I edit this code so It will redirect within whatever second I set it to?

<%
session.abandon
response.redirect("/login_form.asp")
%>

Put a timer function...

<%

'****************************************
'**      Loop for X Seconds          ;   **
'****************************************

Dim intPauseSeconds     'Holds the Number of Seconds to elapse
'Declare the Timers
Dim tmrStartTime
Dim tmrEndTime
Dim tmrRunTime

Public Function funcWaitForTime(intPauseSeconds)
' This Function loops for the number of seconds specified in the strPauseSeconds variable
' The Time() function returns the number of seconds that have elapsed since midnight.
' It is not precise.

tmrRunTime = 0
tmrStartTime = Timer()
tmrEndTime = Timer()

Do while tmrRunTime < intPauseSeconds
   tmrEndTime = Timer()
      'The If statement handles any date change while the loop is executing
      If tmrStartTime > tmrEndTime Then
          tmrEndTime = tmrEndTime + 86400
      end If
    tmrRunTime = tmrEndTime - tmrStartTime
Loop
End Function

funcWaitForTime(5)
session.abandon
response.redirect("/login_forum.asp")
%>