A simple chat try the source code! Two

Source Code recieve.asp

<% Kname=request. FORM ("Usname")
Kpassword=request. FORM ("Uspassword")
DBPath = SERVER. MapPath ("Chat.mdb")
Set conn = Server.CreateObject ("ADODB. Connection ")
Conn.Open "Driver={microsoft Access driver (*.mdb)};d bq=" & DBPath
SET Rs=conn. EXeCUTE ("SELECT Name,password from Chat") ' WHERE name= ' &kname)
IF RS. EOF THEN
CONN. EXECUTE (INSERT into chat (Name,password) VALUES ("&KNAME&", "&KPASSWORD&") ")
ELSE IF RS. FIELDS ("PASSWORD") <>kpassword THEN
Response.Write "Wrong Password"
End IF
End IF
%>
<frameset rows= "70%,30%" >
<frame src= "forum.asp" name= "main"
Marginwidth= "1" marginheight= "1" noresize >
<frame src= "Frft.asp?kname=
"Name=" Footnotes "marginwidth=" 1 "
marginheight= "1" noresize >
</frameset >