2 svar · 178 visningar · startad av soffan76
Ett nytt problem...
Jag jobbar med ett intranät där man som användare, beroende på vilken avdelning man tillhör ska slussas
vidare automatiskt till rätt sida. Problemet är att det är ganska många folk så jag kan inte skriva ett kort skript typ
If password=sture response.redirect "stures_avdelning.html". Nån som har några tips och erfarenheter.
Databasen är uppbyggd enligt följande:
user password avdelning
<%
Set Conn = server.createObject ("ADODB.Connection")
DBPath = "DBQ=" & Server.MapPath("databas/intra.mdb")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath
SQL = "SELECT* from medarbetare where user =
'"&request.form("user") &"' and password ='"&request.form ("password") & "'"
Set RS = server.createObject ("ADODB.Recordset")
user=request.form("user")
password=request.form("password")
RS.open SQL, Conn, 1,2
If RS.EOF Then
Response.redirect "felinlog.html"
Else
HÄR SKA KODEN IN SOM SKICKAR ANVÄNDAREN RÄTT.
End If
End if
Ok, har kommit lite längre nu...
Här blir det fel, användaren skickas inte vidare...
Else
SQL= "SELECT * FROM medarbetare WHERE user = '" & user & "' and password ='"& password &"'"
Set RS = conn.Execute(SQL)
If RS("foretag") = "cd" Then
Session("foretag")="cd"
Response.redirect "139_cd.html"
ElseIf RS("foretag") = "cdc" Then
Session("foretag")="cdc"
Response.redirect "390_cdc.html"
...o.s.v......
Löste det, jag hade visst skrivit med stora bokstäver i databasen och små i koden.....