% Set con = Server.CreateObject("ADODB.Connection") con.Open "DBQ=" & Server.MapPath("./Dbase/counter.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverID=25;FIL=MSAccess;" SQL = "SELECT * FROM counter" SET RS = con.Execute(SQL) RS.MoveFirst count = RS("counts") + 1 SQL = "UPDATE counter SET counts = '"&count&"' " SET RS = con.Execute(SQL) con.CLOSE %>
Click on line #X to visit my old BBS.
Number of Visit :
Besides web server, ftp server & mail server (want a betaversion email account?), we will setup game server, news group & telnet.....K6-2 350
64MB RAM
4 GB Harddisk
Windows98 SE only
Please visit our HOMEpage.... (but still under construction)
<= Click this poor guy for web mail...
| Beta Version on Internet | Adam's Page |
| Shirley's Page | Kamen's Page |
How to setup Web Server@home?