[Marcelolins]

Para verificar o nome e senha fiz assim:

<%
Dim cn, DSN, rs, strSql, login, senha


login=Request.Form("login")
senha=Request.Form("senha")


Set cn=Server.CreateObject("ADODB.Connection")
DSN="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN= dsn & "DBQ=" & server.mappath("..\banco\banco.mdb") & ";"
cn.Open DSN


strSql= "SELECT * FROM users WHERE login='"&login&"' and senha='"&senha&"'"


set rs= Server.CreateObject("ADODB.Recordset")
rs.Open strSql, cn, 1, 2


If not rs.eof then
Session("login") = login
Response.write "<script language='javascript'>document.location='default.asp';</script>"



Else
Session("login") = "visitante"
Response.write "<script language='javascript'>alert('login inválido!');"
Response.write "history.back();</script>;"
End if


rs.close
cn.close
Set rs = nothing
Set cn = nothing
%>


Preciso fazer a função para Adicionar Nome e Senha, mas eu não sei, alguém pode me instruir ?