KiReSt
09-01-2005, 07:54 PM
Hello, im currently makeing an online game, and i need some flash for the character creation in the game since i can't make it in javascript because it doesnt work in firefox, can someone please help me, i have been working on this action scripot for a long time now, if you can take a look at it and either remake the whole thing if the codes confuses you, or fix the rest of the script.
Heres the Flash file: http://doravoc.com/includes/charactercreation/step3/ability.fla
And heres the ASP file to add the records to the database:
<!--#include file="../../../functions/common.asp"--><% 'Gets the database settings and stuff %>
<%
if NOT AccountID = "" then
'Save abilities
error_ = false
str = request.QueryString("Str")
dex = request.QueryString("Dex")
con = request.QueryString("con")
int_ = request.QueryString("Int")
wis = request.QueryString("Wis")
cha = request.QueryString("Cha")
Set rsUsers = Server.CreateObject("ADODB.Recordset")
strUsersSQL = "Update tblCharacters SET "
strUsersSQL = strUsersSQL & "tblCharacters.Strength = "&str&", "
strUsersSQL = strUsersSQL & "tblCharacters.Dexterity = "&dex&", "
strUsersSQL = strUsersSQL & "tblCharacters.Constitution = "&con&", "
strUsersSQL = strUsersSQL & "tblCharacters.Intelligence = "&int_&", "
strUsersSQL = strUsersSQL & "tblCharacters.Wisdom = "&wis&", "
strUsersSQL = strUsersSQL & "tblCharacters.Charisma = "&cha&", "
strUsersSQL = strUsersSQL & " WHERE tblCharacters.AccountID = "&AccountID&""
rsUsers.Open strUsersSQL, strUsersCon
else
error_ = true
end if
response.Write "error"
if error_ = true then response.Write "=True"
if error_ = false then response.Write "=False"
%>
right now, everything works except for the save functions, it can't save to the database and i dont know why, thats what i need help too. ;)
also theres some bugs while clicking on the buttons but you dont need to fix that, but of course if you do i will be glad :)
Help is Greatly appreciated! :)
Heres the Flash file: http://doravoc.com/includes/charactercreation/step3/ability.fla
And heres the ASP file to add the records to the database:
<!--#include file="../../../functions/common.asp"--><% 'Gets the database settings and stuff %>
<%
if NOT AccountID = "" then
'Save abilities
error_ = false
str = request.QueryString("Str")
dex = request.QueryString("Dex")
con = request.QueryString("con")
int_ = request.QueryString("Int")
wis = request.QueryString("Wis")
cha = request.QueryString("Cha")
Set rsUsers = Server.CreateObject("ADODB.Recordset")
strUsersSQL = "Update tblCharacters SET "
strUsersSQL = strUsersSQL & "tblCharacters.Strength = "&str&", "
strUsersSQL = strUsersSQL & "tblCharacters.Dexterity = "&dex&", "
strUsersSQL = strUsersSQL & "tblCharacters.Constitution = "&con&", "
strUsersSQL = strUsersSQL & "tblCharacters.Intelligence = "&int_&", "
strUsersSQL = strUsersSQL & "tblCharacters.Wisdom = "&wis&", "
strUsersSQL = strUsersSQL & "tblCharacters.Charisma = "&cha&", "
strUsersSQL = strUsersSQL & " WHERE tblCharacters.AccountID = "&AccountID&""
rsUsers.Open strUsersSQL, strUsersCon
else
error_ = true
end if
response.Write "error"
if error_ = true then response.Write "=True"
if error_ = false then response.Write "=False"
%>
right now, everything works except for the save functions, it can't save to the database and i dont know why, thats what i need help too. ;)
also theres some bugs while clicking on the buttons but you dont need to fix that, but of course if you do i will be glad :)
Help is Greatly appreciated! :)