Hvad går galt her?
Fejltype:Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[MySQL][ODBC 3.51 Driver][mysqld-3.23.53-max-nt]You have an error in your SQL syntax near 'tryout='0'Teamspeak='1'teamspeak_server='123.123.123'teamspeak_port='3456'clan_s' at line 1
/CZ-2.0/include/inc_edit_klan_info.asp, line 450
Min kode:
<%
if Request.QueryString("page") = "gem_klan_info" Then
strclanname = Request.Form("clanname")
strtag = Request.Form("tag")
strgame = Request.Form("game")
strgame1 = Request.Form("game1")
strgame2 = Request.Form("game2")
strgame3 = Request.Form("game3")
strcountry = Request.Form("country")
strhomepage = Request.Form("homepage")
strclanleader = Request.Form("clanleader")
stremail = Request.Form("email")
strserver = Request.Form("server")
strchan = Request.Form("chan")
strusername = Request.Form("username")
strpassword = Request.Form("password")
strnote = Request.Form("note")
strtryout = Request.Form("tryout")
strTeamspeak = Request.Form("Teamspeak")
strteamspeak_server = Request.Form("teamspeak_server")
strteamspeak_port = Request.Form("teamspeak_port")
strclan_server = Request.Form("clan_server")
strserver_ip = Request.Form("server_ip")
strserver_port = Request.Form("server_port")
strprivat_server = Request.Form("privat_server")
strID = Request.Form("ID")
strSQL = "UPDATE cz_clans SET "
strSQL = strSQL & "clanname='" & strclanname & "',"
strSQL = strSQL & "tag='" & strtag & "',"
strSQL = strSQL & "game='" & strgame & "',"
strSQL = strSQL & "game1='" & strgame1 & "',"
strSQL = strSQL & "game2='" & strgame2 & "',"
strSQL = strSQL & "game3='" & strgame3 & "',"
strSQL = strSQL & "country='" & strcountry & "',"
strSQL = strSQL & "homepage='" & strhomepage & "',"
strSQL = strSQL & "clanleader='" & strclanleader & "',"
strSQL = strSQL & "email='" & stremail & "',"
strSQL = strSQL & "server='" & strserver & "',"
strSQL = strSQL & "chan='" & chan & "',"
strSQL = strSQL & "username='" & strusername & "',"
strSQL = strSQL & "note='" & strnote & "',"
strSQL = strSQL & "password='" & strpassword & "'"
strSQL = strSQL & "tryout='" & strtryout & "'"
strSQL = strSQL & "Teamspeak='" & strTeamspeak & "'"
strSQL = strSQL & "teamspeak_server='" & strteamspeak_server & "'"
strSQL = strSQL & "teamspeak_port='" & strteamspeak_port & "'"
strSQL = strSQL & "clan_server='" & strclan_server & "'"
strSQL = strSQL & "server_ip='" & strserver_ip & "'"
strSQL = strSQL & "server_port='" & strserver_port & "'"
strSQL = strSQL & "privat_server='" & strprivat_serve & "'"
strSQL = strSQL & "Where Id = " & strID
myConn.Execute(strSQL)
strclanname = Request("clanname")
strSQL1 = "UPDATE cz_members SET "
strSQL1 = strSQL1 & "clanname='" & strclanname & "'"
strSQL1 = strSQL1 & "Where clanId = " & strID
myConn.Execute(strSQL1)
strSQL2 = "UPDATE cz_klan_news SET "
strSQL2 = strSQL1 & "clan='" & strclanname & "'"
strSQL2 = strSQL1 & "Where clanId = " & strID
myConn.Execute(strSQL2)
myConn.Close
Set myConn = Nothing
Response.Redirect("./page=besked&msg=5")
End If
%>
jeg kan ikke finde fejlen :(
/Wall