![]() |
|
|
|||||||
| ASP Diskussioner om Active Server Pages, med relaterade scriptspråk (klassisk asp). |
![]() |
|
|
Trådverktyg | Visningsalternativ |
|
|
#1 |
|
Medlem
Registrerad: 2000-06-30
Ort: sthlm
Inlägg: 325
Lösningar: 1 |
Har lite problem med följande kod:
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)
%>
conn.asp är det inte fel på! ------------------ Gaski: Viktig IT-profil!!! |
|
|
|
|
|
#2 |
|
Medlem
Registrerad: 2000-03-26
Inlägg: 1 228
Lösningar: 523 |
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 |
|
|
|
![]() |
| Trådverktyg | |
| Visningsalternativ | |
|
|