<%@ LANGUAGE = VBScript %> <% Dim strTitle, strContent Select Case LCase(Request.QueryString("c")) Case "vs" strTitle = "Visa CVV2 number" strContent = "" strContent = strContent & "" strContent = strContent & "" strContent = strContent & "
" strContent = strContent & "Enter your CVV2 number, located on the back of your Visa card.
" Case "mc" strTitle = "Mastercard CVC2 number" strContent = "" strContent = strContent & "" strContent = strContent & "" strContent = strContent & "
" strContent = strContent & "Enter your CVC2 code, located on the back of your Mastercard.
" Case "ax" strTitle = "American Express CID number" strContent = "" strContent = strContent & "" strContent = strContent & "" strContent = strContent & "
" strContent = strContent & "Enter your CID number, located on the front of your American Express card.
" Case "ds" strTitle = "Discover CID number" strContent = "" strContent = strContent & "" strContent = strContent & "" strContent = strContent & "
" strContent = strContent & "Enter your CID number, located on the back of your Discover card.
" End Select Response.Write "" Response.Write strTitle Response.Write "" &VbCrLf Response.Write "" &VBCrLf Response.Write strContent &VBCrLf Response.Write "" &VBCrLf Response.Write "" &VBCrLf %>