<% 'Reply : Store Name / New User option explicit dim conn dim DSNtemp dim rs dim ssql '**************************************************** 'database connection string setting DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; " DSNtemp=DSNtemp & "DBQ=" & server.mappath("../db/dbServer.mdb") DSNtemp=DSNtemp & ";Password=790527145433" set conn = server.createobject("adodb.connection") conn.Open DSNtemp ssql = "select * from tbl_store where store_serial_number = '" & Request.Form("serial_number") & "'" set rs = server.CreateObject("adodb.recordset") rs.Open ssql,conn,3,3 if not rs.EOF then Response.Write rs("store_name") else Response.Write "New User" end if rs.Close conn.close set rs = nothing set conn = nothing %>