<% @ ENABLESESSIONSTATE = FALSE %>
<%
OPTION EXPLICIT
Response.Buffer = TRUE
Dim connection, rs, session
If Request.Form("login") = "login" Then
Set Connection = CreateObject("ADODB.Connection")
Connection.Open "databas"
Set RS = Connection.Execute("SELECT * From users Where username = '" & Request.Form("username") & "' AND password = '" & Request.Form("password") & "'")
If RS.EOF Then
blabla
Else
Session("username") = RS("username")
RS.Close
Connection.Close
Response.Redirect("/login/main.asp")
End If
End If
%>
sen är det lite htmlkod okså men den tror jag inte behövs
------------------
// David - Probably the best guy in the world