Problema con Access...
Publicado por Juan (2 intervenciones) el 23/05/2003 01:19:47
-Alguien sabe porque me sale una coma delante de cada campo insertado en access a la hora de hacer "r.addnew". Seguro que es un tonteria pero es que me estoy volviendo loco con el tema. El codigo es este:
Insertarusr.asp
<html>
<body>
<form method="post" action="Insertarbd.asp">
<input type="hidden" name="Codigo" value="">
<input type="hidden" name="Titulo" value="">
Codigo :
<input type="text" name="Codigo" value="" maxlenght="3"><p>
Titulo :
<input type="text" name="Titulo" value=""><p>
<input type="submit" value="Insertar">
<%
Response.Write("</table>")
Response.Write("</font>")
%>
</form>
</body>
</html>
Insertarusr.asp
<%
set con=Server.CreateObject("ADODB.Connection")
set r=Server.CreateObject("ADODB.Recordset")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("./db/pelis.mdb")&";"
r.CursorType=1
r.LockType=2
SQL="Select * from Peliculas order by Codigo"
r.Open SQL , con
r.addnew
r.Fields("Codigo")=Request.Form("Codigo")
r.Fields("Titulo")=Request.Form("Titulo")
r.update
r.close
con.close
set r=nothing
set con=nothing
Response.Write("Se ha introducido una pelicula nueva en la base de datos....")
%>
Insertarusr.asp
<html>
<body>
<form method="post" action="Insertarbd.asp">
<input type="hidden" name="Codigo" value="">
<input type="hidden" name="Titulo" value="">
Codigo :
<input type="text" name="Codigo" value="" maxlenght="3"><p>
Titulo :
<input type="text" name="Titulo" value=""><p>
<input type="submit" value="Insertar">
<%
Response.Write("</table>")
Response.Write("</font>")
%>
</form>
</body>
</html>
Insertarusr.asp
<%
set con=Server.CreateObject("ADODB.Connection")
set r=Server.CreateObject("ADODB.Recordset")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("./db/pelis.mdb")&";"
r.CursorType=1
r.LockType=2
SQL="Select * from Peliculas order by Codigo"
r.Open SQL , con
r.addnew
r.Fields("Codigo")=Request.Form("Codigo")
r.Fields("Titulo")=Request.Form("Titulo")
r.update
r.close
con.close
set r=nothing
set con=nothing
Response.Write("Se ha introducido una pelicula nueva en la base de datos....")
%>
Valora esta pregunta
0