PDA

View Full Version : Asp-fel.....


Gaski
2000-08-20, 07:03
Har lite problem med följande kod:

<%
Response.ContentType = "text/vnd.wap.wml"

Dim SQLquery
Dim rsNewUser
Dim strUser
Dim strPassword

strUser = request("newuser")
strPassword = request("psw")
%>

<?xml version="1.0"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>

<%

SQLquery = "SELECT [user_id] FROM user"
set rsNewUser = conn.Execute(SQLquery)

Do While Not rsNewUser.EOF
If rsNewUser("user_id") = strUser Then
response.write("<card id='Userexist' title='" & strUser & " already exist'>")
response.write("<p><small>Username does already exist.<br/>Please choose another one <a href='index.wml#newuser'>here</a>.")
response.write("</small></p></card>")
Else
rsNewUser.MoveNext
End if
Loop

SQLquery = "INSERT INTO user (user_id, password) VALUES ('" & strUser & "', "' & strPassword & "')"
set rsNewUser = conn.Execute(SQLquery)

%>


När jag kör denna kod fryser WinWap, vad är fel?

conn.asp är det inte fel på!

------------------
Gaski: Viktig IT-profil!!!

AG
2000-08-20, 10:57
Först se till att du avslutar med </wml> hittade inget sådant i din kod.

Om det inte är det skall jag kolla vidare på det i eftermiddag, slängde bara ett getöga på det :)

Andreas