תפירת הטלאים

<%
' Get the variable from the querystring.
Request,Querystring("email")

' Build the SQL statement, making sure to surround the text
 field "email" with single quotes
SQL="SELECT fname, Iname FROM Clients"
SQL=SQL & "WHERE email = ' " & email & " ' "

' Create connection named "conn". Load the resulting 
recordset into the variable myclient.
set conn = server.createobject ("ADODB.Connection")
conn.open "parking"
set myclient=conn.execute(SQL)

' Test to see if there are any matching records. If not, 
give a message.
If myclient.bof and myclient.eof then
      Response.Write ("You are not a member. Please sign in.")

' Otherwise, give another message.
      Else
          Response.Write ("Welcome back! & myclient(0) 
		  & " " & myclient(1) & ". I think I love you."
EndIf

conn.close
%>

אתם תחזרו הנה עכשיו! אתם שומעים?