
07/02/2002, 00:28
|
| | Fecha de Ingreso: enero-2002
Mensajes: 141
Antigüedad: 23 años, 4 meses Puntos: 0 | |
Login Temperamental Hola Amigos, ayudadme porfa, tengo una semana
durmiendo a raticos por este dilema
tengo un sistema de login que trabaja perfecto en mi maquina pero no funciona en el server:
ayudenme y publico el script completo que es muy rapido y eficiente, gracias
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 2.
en mi maquina hago lo que sea con ese recordset pero en el servidor no,
soy administrador del servidor y tengo las mismas versiones del MDAC 2.7 y las mismas rutas fisicas y logicas en ambas maquinas, las carpetas tienen los privilegios de escritura y estan compartidas
me arroja el error
<%@ Language="VbScript"%>
<%
Set Conn = Server.CreateObject("Adodb.Connection")
Dim DSNtemp
DSNtemp="Provider=MSDASQL;"
DSNtemp=DSNtemp & "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=DSNtemp & "DBQ=C:\web\users\v013u25gam\db\domesa\aspgpa sswords.mdb;"
Conn.open DSNtemp
Dim UserName
Dim Password
UserName = Request.Form("USERNAME")
Password = Request.Form("PASSWORD")
If Len(UserName) > 0 Then
msql = ("SELECT USERNAME, PASSWORD FROM USERS WHERE USERNAME='" & UserName & "' AND PASSWORD='" & Password & "'")
Set RS = Conn.Execute(msql)
If RS.EOF Then
ErrorMessage = "<P><font color=""red"">Invalid Username or Password</font></P>"
RS.Close
Conn.Close
Set RS = Nothing
Set Conn = Nothing
Else
Session("SecurityID") = "ÄÏÍÅÓÁ"
Response.redirect session("actual")
End If
End If
%> |