webForumDet fria alternativet

Asp-fel.....

ASP

1 svar · 137 visningar · startad av Gaski

Medlem sedan juni 2000310 inlägg
Frågan#1

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!!!

Medlem sedan mars 20001 266 inlägg
#2

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

256 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
123 ms — deklarationer (db)
0 ms — hämta statistik (cache)
130 ms — hämta tråd, inlägg och bilagor (db)
121 ms — ändringar (db)