<%
phonenumber = Trim(Request.Form("textfield"))
If phonenumber="" then
phonenumber=Request.QueryString("phonenumber")
End If
Set connection = Server.CreateObject("ADODB.Connection")
connection.Open("customers")
SQL="SELECT * FROM Phone WHERE Phone_Number like '"&phonenumber&"';"
Set list=connection.Execute(SQL)
If list.EOF then Response.Redirect("./cphonenotfound.asp") End If
%>
Cellular Advice NI LTD
