Hej,
det är så att jag har ett litet problem, jag vill göra en funktion av denna kod.
Och kan absolut ingenting om Funktioner.
If Request.Form("title1")<> "" THEN
CountM = Countm + 1
RecSet.AddNew
RecSet("title") = Request.Form("title1")
RecSet("type") = Request.Form("type1")
RecSet("user") = Request.Form("user1")
RecSet("Cd") = Request.Form("Cd1")
RecSet("Size") = Request.Form("Size1")
RecSet("quality") = Request.Form("quality1")
RecSet("dvdrip") = Request.Form("dvdrip1")
RecSet("IMDb") = Request.Form("IMDb1")
Recset("IP") = Request.ServerVariables("REMOTE_ADDR")
RecSet.Update
Connection2.Execute "UPDATE users SET Movies = Movies + 1 WHERE User='" & User & "'"
Connection4.Execute "UPDATE divxcount SET Movies = Movies + 1 WHERE ID='Divxcount'"
END IF
Och på ngt sätt vill jag kunna bestämma vilken siffra det ska stå i Request.Form, nu står det 1 men jag vill kunna bestämma då jag anropar funktionen vilken siffra det skall vara där.
Hoppas ni förstår mig och kan hjälpa mig.
Är tacksam för all slags hjälp ;)
Varför vill du ha det som en funktion (eller sub)? Jag tycker att det blir för mycket globala variabler. Om du har en loop så kan du väl läggga det direkt i loopen.
for item = 1 to someValue
If Request.Form("title" & item)<> "" THEN
CountM = Countm + 1
RecSet.AddNew
RecSet("title") = Request.Form("title" & item)
RecSet("type") = Request.Form("type" & item)
RecSet("user") = Request.Form("user" & item)
RecSet("Cd") = Request.Form("Cd" & item)
RecSet("Size") = Request.Form("Size" & item)
RecSet("quality") = Request.Form("quality" & item)
RecSet("dvdrip") = Request.Form("dvdrip" & item)
RecSet("IMDb") = Request.Form("IMDb" & item)
Recset("IP") = Request.ServerVariables("REMOTE_ADDR")
RecSet.Update
Connection2.Execute "UPDATE users SET Movies = Movies + 1 WHERE User='" & User & "'"
Connection4.Execute "UPDATE divxcount SET Movies = Movies + 1 WHERE ID='Divxcount'"
END IF
next
Varför har du olika connections?
------------------ essentitia preter non sans multiplicandum
