<script language="javascript">
function SearchAfterName()
{
var hisnick;
var name_exist=false;
hisnick=document.myform.nick.value;
<%
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Driver={Microsoft Access Driver (*.mdb)};" & _
				   "Dbq= D:\content\users1\aviad\db\rishum.mdb;" & _
                                   "Uid=admin;" & _
                                   "Pwd=;"
Set tableRs=Server.CreateObject("ADODB.Recordset")
mySql= "Select fname From table1 WHERE fname IN ('"&hisnick&"')"
tableRs.Open mySql, oConn,3,3
%>

<% if tableRs.recordcount>0 Then %>
name_exist=true;
<% End If %>
return name_exist;
}
</script>
<script language="javascript">
function check_tofes()
{
if(SearchAfterName()==true)
{
alert("שם המשתמש תפוס, בחר אחד אחר");
return(false);
}
return(true);	
}
</script>

<%
if (הטופס נשלח) then
    Set oConn = Server.CreateObject("ADODB.Connection")oConn.Open "Driver={Microsoft Access Driver (*.mdb)};" & "Dbq= D:\content\users1\aviad\db\rishum.mdb;" & "Uid=admin;" & "Pwd=;"
    Set tableRs=Server.CreateObject("ADODB.Recordset")
    hisnick=request.form("hisnick")
    mySql= "Select fname From table1 WHERE fname IN('"&hisnick&"')"tableRs.Open mySql, oConn,3,3
    
    if tableRs.recordcount>0 Then
       response.write("<script language='javascript'> alert('שם המשתמש תפוס, אנא בחר אחד אחר.'); </script>")
    else
       המשתמש פנוי, ואז תעשה מה שבא לך...
    end if
    
    tableRs.close
    set tableRs=nothing
    oConn.close
    set oConn=nothing
end if
%>

<form action="http://users1.nofeehost.com/aviad/db/reg.asp" method="post" name="myform" action="pageName.asp">