Inserção na BD - ASP

[Tiago Mano]

Boas pessoal.

Eu estou a fazer uns testes em .asp num servidor "free hosting", o problema é que eu já li muitos tutoriais e quando vou a inserir dá sempre erro ou simplesmente não dá nada. Consigo listar, só que editar, apagar e eliminar não consigo.

Aqui envio o código de duas formas que tentei:

--- 1ª Forma:

Tenho uma página com um formulario que chama esta acção:

<% sub introduzir()

conn="DRIVER={Microsoft Access Driver (*.mdb)};"
conn=conn & "DBQ="&Server.MapPath("../dbd/xpx.mdb")&";"
Set rs=server.CreateObject("ADODB.Recordset")
sqlst="INSERT INTO Utilizadores (Login,Pass) VALUES('"& request.form("login") &"','" & request.form("pass") &"')"
rs.open sqlst,conn,2,1

%>


2ª Forma:

inserir.asp

<form id="form1" name="form1" method="post" action="confirm.asp">
Login:
<label>
<input name="Login" type="text" id="Login" />
</label>
<p>Pass:
<label>
<input name="Pass" type="text" id="Pass" />
</label>
</p>
<p>
<label>
<input type="submit" name="Submit" value="Submit" />
</label>
</p>
</form>

confirm.asp

<%

Dim oconn
Dim filepath
Dim Ors
DIM SQLStr

filepath=Server.MapPath("../dbd/xpx.mdb")
Set oconn = Server.CreateObject("ADODB.CONNECTION")
oconn.open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & filepath
set ors=Server.CreateObject("ADODB.Recordset")
SQLStr = "Insert Into Utilizadores (Login, Pass) "
SQLStr = SQLStr & "VALUES('" & Server.HTMLEncode(request.form("Login")) & "', '"
SQLStr = SQLStr & Server.HTMLEncode(request.form("Pass")) & "')"
oconn.execute SQLStr
response.redirect("utilizadores.asp")

%>



Se alguém me poder ajudar agradeço.