<% Dim sCertificate, i sCertificate = Request.Form("Source") i = Request.Form("Do") If i = "" Then i = 0 i = (CLng(i) + 1) If sCertificate = "" And i < 2 Then Response.Write "" & vbCrLf Response.Write "" & vbCrLf Response.Write "" & vbCrLf Response.Write "
" & vbCrLf Response.Write "" & vbCrLf Response.Write "" & vbCrLf Response.Write "" & vbCrLf Response.Write "" & vbCrLf Response.Write "" & vbCrLf Response.End End If %> Certificate