+- net-board.net Archiv (https://net-board.net)
+-- Forum: Deine eigene Homepage (https://net-board.net/forumdisplay.php?fid=26)
+--- Forum: Scriptsprachen (+Datenbanksysteme) (https://net-board.net/forumdisplay.php?fid=19)
+---- Forum: Selbstprogrammierte Scripts (https://net-board.net/forumdisplay.php?fid=17)
+---- Thema: Counter (/showthread.php?tid=2907)
Seiten:
1
2
Counter - Zerogiven - 26.10.2003
![[Bild: counter.gif]](http://www.boldluck.at/images/counter.gif)
Download: counter.zip | counter.rar
Installation: Readme & Installation
Hier noch die Online Demo:
Online Demo
Fragen und Feedback sind gewünscht.
mfg
Zerogiven
- marlem - 26.10.2003
hi zero,
danke!
kann ich die schriftgröße und farbe ändern?
wenn ja wie?
- kickedINtheHEAD - 26.10.2003
in der counter.asp in den letzten zwei teilen wird der text geschrieben - du musst nur dort html tags deiner wahl einfügen
ip sperre ist keine dabei oder?
- marlem - 26.10.2003
hi,
ob eine sperre dabei ist, weiß ich nicht!
frage:
kann ich auch eine externe style-sheetsdatei einbinden?
und style-sheet verwenden.
wenn ja wie?
- kickedINtheHEAD - 26.10.2003
sicher - einfach den html code für das style sheed in die default.asp schreiben
- Zerogiven - 26.10.2003
Ne IP Sperre mach ich bei der V 1.1 dann, aber das war heute so ein: "Mir ist langweilig ich scripte was" - Script
Natürlich werden noch weiter Features wie Wochenstatistik, IP SPerre etc. kommen.
mfg
Zerogiven
- marlem - 27.10.2003
hi zerogiven,
meine counter.asp sie mit eingebundenem style-sheet so aus:
Code:
<!-- #include file="config.asp" -->
<link rel="stylesheet" type="text/css" href="..\style.css">
<%
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & conPath
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.open strConn
selSQL = "Select DerTag from tblCounter"
set rs = objConn.Execute(selSQL)
zDBTag = FormatDateTime(rs("DerTag"),2)
rs.Close
set rs = nothing
If FormatDateTime(now(), 2) <> zDBTag Then
updSQL = "Update tblCounter set DerTag='" & FormatDateTime(now(), 2) & "', Heute=0"
objConn.Execute(updSQL)
End If
conSQL = "Update tblCounter set Gesamt = Gesamt + 1, Heute = Heute + 1"
objConn.Execute(conSQL)
selSQL = "Select Gesamt, Heute from tblCounter"
set rs = objConn.Execute(selSQL)
zGe = rs("Gesamt")
zHe = rs("Heute")
rs.Close
set rs = nothing
objConn.Close
set objConn=nothing
<span class="NormalerText">
response.write("Heute: " & zHe & "<br>")
response.write("Gesamt: " & zGe)
</span>
%>ist das okay so?
- marlem - 27.10.2003
hi zero,
habe es auf der startseite so eingebunden:
<!-- include file='http://www.marlem-software.sunsonic.de/html/jaba/Counter/counter.asp' -->
funzt aber nicht! warum?
- Nata - 27.10.2003
hi leute
)ich bin auf der suche nach 2 countern...einmal für meine hp http://www.martinkesici.net und für den fanclub http://home.arcor.de/a_wendt/devils
kann mir jemand helfen, bitte?
)
- Zerogiven - 27.10.2003
Also, bei include file musst du nicht http:// o.ä. eingeben, sondern nur den Dateipfad. Also z.B. nur "counter.asp"
Dass mit der CSS Datei kannst du so lassen.
Was schreibt er denn für einen Fehler hin?
mfg
Zerogiven