Paste a paragraph of ASP and WML query database code, we refer to the reference, in fact, with ASP to write a Web page very similar.
<%response.contenttype = "TEXT/VND.WAP.WML"%>
http://www.wapforum.org/DTD/wml_1.1.xml"
<%
Dim Conn, RS
Dim Strsql,strfirstname, strLastName
Set conn = Server.CreateObject ("ADODB. Connection ")
Set rs = Server.CreateObject ("ADODB.") Recordset ")
Conn.Open session ("myconnect_string") ' Replace with your connect string
Strwhois = Request.QueryString ("username")
if strwhois= "then
% >
Please enter username to find
/do>
<%
Else
strSQL = "SELECT * from tblusers WHERE Username = ' & Strwhois & '"
Set RS = conn. Execute (strSQL)
%>
<%
If not Rs. EOF Then
Rs. MoveFirst
Response.Write " User Search Results "
While not Rs. Eof
strFirstName = "The Name of" & RS ("FirstName")
strLastName = "Last Name" & RS ("LastName")
Response.Write strFirstName
Response.Write strLastName
Rs. MoveNext
Wend
Else
Response.Write "Sorry, no user found."
End If
%>
<%
End If
%>