Ver Mensaje Individual
  #1 (permalink)  
Antiguo 07/02/2002, 00:28
galindox
 
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
%>