Jag håller på med ett barnnerroteringsscript som bl.a. ska räkna antalet klick. Så när man klickar på bannern så ska en asp funktion köras som ändrar i databasen. Problemet är att det blir lite konstigt när jag skriver funktionsanropet inom Javascript händelsen OnClick.
Så här ser det ut:
Function Klicka(klick, id)
klick=klick+1
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\Inetpub\wwwroot\bannerrotator\db\banners.mdb"
SQL = "Update banners SET klick=" & klick & " WHERE id=" & id
MinCon.Execute (SQL)
End Function
Och onClick anropet ser ut så här:
onClick="<% Klicka(klicken, idt) %>"
Felet blir:
Kompileringsfel i Microsoft VBScript (0x800A0414)
Det går inte att använda parenteser när en Sub anropas.
/bannerrotator/banner.asp, line 36, column 20
Klicka(klicken, idt)
-------------------^
Självklart är jag öppen för förslag om det är någon som har en smartare lösning :)
Oj va dum jag är :l
Det som står inom <% och %> exekveras väl alltid även om OnClick inte inträffar så det där kan man ju aldrig få att fungera på det där sättet.
<%
If request.querystring("banner_id") <> "" then
SQL="SELECT * from TABBEL where id="& request.querystring("banner_id")
SET RS = conn.execute(SQL)
count = RS("banner bytare") + 1
sen update dtabas kod som jag ej orkar skriva sen
response.redirect RS("URL till banner bytaren")
jag tror att det borde bli så
------------------
varje år så skänker svenska kyrkan pengar till AIK, det betyder att Gud är en gnagare.. (AIK:are)