Problemas con la conexion
Publicado por Salva (1 intervención) el 18/01/2002 18:43:57
Hola, estoy intentando hacer una pagina asp q se conecte a una base de datos pero me da un "error interno del servidor" (numero 500) porfavor si algien sabe como solucionarlo q me lo diga. Gracias
El codigo de la pagina es este:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<TITLE></TITLE>
</HEAD>
<BODY>
<%
'Connection y Command
Dim Cnn
Dim Cmd
Set Cnn=Server.CreateObject ("ADODB.Connection")
With Cnn
.ConnectionString = "FILEDSN=datos.dsn"
End with
Set Cmd=Server.CreateObject("ADODB.Command")
With Cmd
.CommandText="INSERT INTO Usuarios ('Ip, Nombre') VALUES ('" & Request.QueryString ("apellidos") & ", " & Request.QueryString ("nombre") & "')"
.CommandType = adCmdText
End With
Cnn.Open
set Cmd.ActiveConnection= cnn
Cmd.Execute
%>
<%= apellidos%> <BR>
<%= nombre%>
</BODY>
</HTML>
El codigo de la pagina es este:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<TITLE></TITLE>
</HEAD>
<BODY>
<%
'Connection y Command
Dim Cnn
Dim Cmd
Set Cnn=Server.CreateObject ("ADODB.Connection")
With Cnn
.ConnectionString = "FILEDSN=datos.dsn"
End with
Set Cmd=Server.CreateObject("ADODB.Command")
With Cmd
.CommandText="INSERT INTO Usuarios ('Ip, Nombre') VALUES ('" & Request.QueryString ("apellidos") & ", " & Request.QueryString ("nombre") & "')"
.CommandType = adCmdText
End With
Cnn.Open
set Cmd.ActiveConnection= cnn
Cmd.Execute
%>
<%= apellidos%> <BR>
<%= nombre%>
</BODY>
</HTML>
Valora esta pregunta
0