Problema con asp

Goatse #1 Ago '06

Hola estoy empezando con asp tengo un problema, tengo un web con 4 cajas de texto y quiero hacer que esa informacion al pulsar un boton se guarda en un db:

Source --------------------------

<html>

<head>
<title>Registrase</title>
</head>

<p>Registrase</p>
<table border="0" width="100%">
<tr>
<td width="50%" align="right">
Usuario</td>
<td width="50%"> </td>
</tr>
<tr>
<td width="50%" align="right">
Password</td>
<td width="50%">
</td>
</tr>
<tr>
<td width="50%" align="right">
Repita password </td>
<td width="50%">
</td>
</tr>
<tr>
<td width="50%" align="right">Dirección de mail </td>
<td width="50%">
</td>
</tr>
<tr>
<td width="50%" align="right"></td>
<form ACTION="" action="GET">

	    <td width="50%">[i]</td>

<%
Dim SQL_Datos
response.write ("NEW")
SQL_Datos = "INSERT INTO Usuarios (dUsuario, dPassword, dMail) VALUES ('"&usuario&"', '"&password&"', '"&mail&"')"
response.write(sql_datos)
oConn.Execute(SQL_Datos)
%>

	    </form>

</tr>
</table>
               <br>
           
<br>
<br>
</body>

</html>

A ver si alguien me puede hachar una mano.
gracias

IS4kO #2 Ago '06

Imiaginando que solo tenemos dos campos en el formulario usuario y mail:

<%
usuario=Request.Form("usuario")
mail= Request.Form("mail")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Mibase"

sSQL="Insert Into tabla (CampoUsuario,CampoMail) values ('" & usuario & "','" & mail & "')"

set RS = Conn.Execute(sSQL)

Conn.Close
%>

Soltrac #3 Ago '06 MV Wizard

¿El oConn donde lo has declarado?

Antes de nada...

Dim oConn
oConn = CreateObject("ADODB.Connection")
oConn.Open "Usuarios"

'Aqui tu codigo

oConn.Close

IS4kO #4 Ago '06

Tu lo llamaste oConn, yo Conn, es lo mismo, como si te da por llamarlo Wachipilfree, es el nombre del objeto, con el SET lo instancias directamente...

<%
usuario=Request.Form("usuario")
mail= Request.Form("mail")

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "BaseDeDatos"

sSQL="Insert Into tabla (CampoUsuario,CampoMail) values ('" & usuario & "','" & mail & "')"

set RS = Conn.Execute(sSQL)

oConn.Close
%>

Soltrac #5 Ago '06 MV Wizard

No te lo decia a ti Is4ko, se lo decia a el xDDD q puso oconn al final ¬¬

Usuarios habituales