Probiers mal hiermit:
Erstelle vorher eine Tabelle namens "zugriffszaehler" mit einer Tabelle
namens "zaehler" mit zwei Spalten 1. nr_id und 2. nr
<%
openStr = "driver={Microsoft Access Driver (*.mdb)};" & _
"dbq=" & Server.MapPath("\test\zugriffszaehler.mdb")
set cn = Server.CreateObject("ADODB.Connection")
cn.Open openStr
sql = "SELECT nr FROM zaehler"
Set rs=cn.Execute(SQL)
%>
<%
besucherzahl = rs("nr") + 1
sql = "Update ZAEHLER SET nr =" & "'" & besucherzahl & "'"
set rs=cn.Execute(SQL)
%>
<br>
<br>
Die Seite wurde <%=besucherzahl%> mal aufgerufen!
<%
set rs = Nothing
cn.close
set cn = Nothing
%>
Gru�,
Christoph
-----Urspr�ngliche Nachricht-----
Von: Reinhold Becker [mailto:[EMAIL PROTECTED]]
Gesendet: Montag, 8. April 2002 14:19
An: ASP Diskussionsliste fuer Anfaenger
Betreff: [aspdebeginners] Besucherz�hler
-- Moved from [aspgerman] to [aspdebeginners] by
[EMAIL PROTECTED] <[EMAIL PROTECTED]> --
Hallo Gruppe,
Ich will einen Besucherz=E4hler in meine Site einbauen, bei der sich der
Wert eines Datensatzes in einer Accesstabelle immer um 1 erh=F6ht.
Folgendes habe ich bis jetzt zusammenbekommen:
<%
set myrec =3D Server.CreateObject("ADODB.Recordset")
myrec.ActiveConnection =3D MM_Access_STRING
myrec.Source =3D "SELECT * FROM Tbl_Zaehler WHERE Zaehler_ID LIKE 1"
myrec.CursorType =3D 0 myrec.CursorLocation =3D 2 myrec.LockType =3D 3
myrec.Open()
myrec_numRows =3D 0
myrec.addnew
myrec.fields("Besucher") =3D myrec.fields("Besucher")+1
myrec.update
myrec.Close
%>
Da kriege ich aber nur immer einen neuen Datensatz. Bitte Hilfe!!!
Ich danke euch,
Reinhold
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv Sie
| knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
