求一个ASP程序

求一个ASP程序

那我重新给你啦:一个最简单的程序'IP.ASP...代码如下: '数据库连接文件<%dim tiptip = Request.ServerVariables("REMOTE_ADDR") '获取来访者IP%><%Sql = "SELECT * FROM ip where ip = '"&tip&"'" '在数据库中查找有无此IP的记录rs.Open Sql, Conn, 1, 3 if rs.recordcount=0 then '如果顷改没有记录就显示恭喜你,并将此IP写入数据库response.Write("恭喜你!")rs.addnewrs("ip")=tiprs.updaters.closeelseresponse.write("对不起档喊,IP重复!") '如果有记录就显示IP重复end if%>'conn.asp*********代码如下<%@ Language=VBScript CODEPAGE=936%><% Option Explicit %><%Dim Conn, Rs, SqlSet Conn = Server.CreateObject("ADODB.Connection")Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("ip.mdb")Set Rs = Server.CreateObject( "ADODB.Recordset" )%>然后需要一个ACCESS的数据库..两个字段就可以啦..一个为ID,设为自动编号..一个为ip,设为文本就可以啦经XP系统测试成功!若还有问行乎野题可以加Q:121734199