<% Dim sId Dim sWay Dim sRedir Dim nBanNoOnPage If Request.QueryString("N") = "" Then nBanNoOnPage = 1 Else nBanNoOnPage = Request.QueryString("N") End If sRedir = AdMentor_ClickAd( nBanNoOnPage ) Response.Redirect sRedir %>