So, das geht jetzt.
Danke, Christoph

Reinhold

-----Urspr�ngliche Nachricht-----
Von: Claus Christoph [mailto:[EMAIL PROTECTED]] 
Gesendet: Montag, 08. April 2002 15:53
An: ASP Diskussionsliste fuer Anfaenger
Betreff: [aspdebeginners] AW: [aspdebeginners] Besucherz�hler


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


| 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

Antwort per Email an