webForumDet fria alternativet

hjälp med detta!

ASP

4 svar · 172 visningar · startad av godiz

Medlem sedan maj 200019 inlägg
Frågan#1

Kan nån hjälpa mig med var jag ska placera in denna koden:

SQL="SELECT * WHERE username='" & request.querystring("username") & "'"
set rs=conn.execute(SQL)

if not rs.eof then
response.redirect "upptaget.html"
end if

i denna koden:
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\godiz\db\login.mdb"))
SQLStmt = "Insert Into Login "
SQLStmt = SQLStmt & "(Login, Password, epost) "
SQLStmt = SQLStmt & "VALUES('" & FixaTecken(Request.Form("Login")) & "', '" & FixaTecken(Request.Form("Password")) & "', '" & FixaTecken(Request.Form("epost")) & "')"
Connection.Execute(SQLStmt)

%>

Medlem sedan dec. 19998 577 inlägg
#2

Om jag har fattat vad scriptet skall göra så skall det ligga såhär:

<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\godiz\db\login.mdb"))
SQL="SELECT * WHERE username='" & request.querystring("username") & "'"
set rs=conn.execute(SQL)

if not rs.eof then
response.redirect "upptaget.html"
end if

SQLStmt = "Insert Into Login "
SQLStmt = SQLStmt & "(Login, Password, epost) "
SQLStmt = SQLStmt & "VALUES('" & FixaTecken(Request.Form("Login")) & "', '" & FixaTecken(Request.Form("Password")) & "', '" & FixaTecken(Request.Form("epost")) & "')"
Connection.Execute(SQLStmt)

%>

------------------
        )|(
       (o o)
-oo0-(_)-0oo-----
webeye.nu

Medlem sedan maj 20006 inlägg
#3

Så här kanske du vill ha det? :)

<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\godiz\db\login.mdb"))

SQL="SELECT * WHERE username='" & request.querystring("username") & "'"
set rs=connection.execute(SQL)

if not rs.eof then
response.redirect "upptaget.html"
else
SQLStmt = "Insert Into Login "
SQLStmt = SQLStmt & "(Login, Password, epost) "
SQLStmt = SQLStmt & "VALUES('" & FixaTecken(Request.Form("Login")) & "', '" & FixaTecken(Request.Form("Password")) & "', '" & FixaTecken(Request.Form("epost")) & "')"
Connection.Execute(SQLStmt)
end if
%>

Medlem sedan maj 20006 inlägg
#4

aargh...såg inte att någon skickat in redan :)

men min kod funkar ändå bättre...så det är bäst att använda den...du behöver inte modifiera ngt... :)

Medlem sedan dec. 19998 577 inlägg
#5

Det är nog snarare så att dom fungerar lika bra...

Du hinner ju ändå inte köra INPUT-koden, man redirectas ju först... Sedan kanske det är en bättre sed att göra som asdf666, men det gör ingen skillnad i outputten...

------------------
        )|(
       (o o)
-oo0-(_)-0oo-----
webeye.nu

259 ms totalt · 4 externa anrop · v20260731065814-full.e96017d9
120 ms — deklarationer (db)
0 ms — hämta statistik (cache)
131 ms — hämta tråd, inlägg och bilagor (db)
124 ms — ändringar (db)