求ASP读取数据库多个表的代码 55
ipt=Request.ServerVariables("Remote_Addr")setrs=server.CreateObject("adodb.recordset"...
ipt=Request.ServerVariables("Remote_Addr")
set rs=server.CreateObject("adodb.recordset")
rs.open"select * from IP where ip='"&ipt&"'",conn,1,3
if not rs.eof then
rs("ipcounter")=rs("ipcounter")+1
rs("datesj")=now()
if rs("ipcounter")= "&c&" then
rs("kill_ip")=true
end if
rs.update
else
rs.addnew
rs("ip")=ipt
rs("ipcounter")=1
rs.update
end if
求:既能查询C的内容又能查询上面那些内容并写入字据的代码, 表:site 字段:cj id:1(只有一条记录)
11月23日,ac数据库,级不能说明白点呀,谢谢!
12月3日,尽管非常负责地回答医学上的问题(而且是太部分是正确的),但我的问题没有人来认真回答下。真是悲哀!莫大的笑话、讽刺。使我产生怀疑。
12月3日,补充,不是这个意思。是说,if rs1("ipcounter")= "&c&" then
这个"&c&" 的数据是在另一个表上,其它数据全部是更新与新增到表:IP的,现在我不知如何读取这个"&c&" 的值 .没有这个数值下面的条件就不生成。
*************************************************************************************
我就是要多表的代码。但我写了很多也不成功。
希望高人能帮下我写出代码,谢谢 展开
set rs=server.CreateObject("adodb.recordset")
rs.open"select * from IP where ip='"&ipt&"'",conn,1,3
if not rs.eof then
rs("ipcounter")=rs("ipcounter")+1
rs("datesj")=now()
if rs("ipcounter")= "&c&" then
rs("kill_ip")=true
end if
rs.update
else
rs.addnew
rs("ip")=ipt
rs("ipcounter")=1
rs.update
end if
求:既能查询C的内容又能查询上面那些内容并写入字据的代码, 表:site 字段:cj id:1(只有一条记录)
11月23日,ac数据库,级不能说明白点呀,谢谢!
12月3日,尽管非常负责地回答医学上的问题(而且是太部分是正确的),但我的问题没有人来认真回答下。真是悲哀!莫大的笑话、讽刺。使我产生怀疑。
12月3日,补充,不是这个意思。是说,if rs1("ipcounter")= "&c&" then
这个"&c&" 的数据是在另一个表上,其它数据全部是更新与新增到表:IP的,现在我不知如何读取这个"&c&" 的值 .没有这个数值下面的条件就不生成。
*************************************************************************************
我就是要多表的代码。但我写了很多也不成功。
希望高人能帮下我写出代码,谢谢 展开
展开全部
<%
sql2="select cj from site where id=1"
set rs2=conn.execute(sql2)
c=rs2(0)
ipt=Request.ServerVariables("Remote_Addr")
set rs=server.CreateObject("adodb.recordset")
rs.open"select * from IP where ip='"&ipt&"'",conn,1,3
if not rs.eof then
rs("ipcounter")=rs("ipcounter")+1
rs("datesj")=now()
if rs("ipcounter")=c then
rs("kill_ip")=true
end if
rs.update
else
rs.addnew
rs("ip")=ipt
rs("ipcounter")=1
rs.update
end if
%>
sql2="select cj from site where id=1"
set rs2=conn.execute(sql2)
c=rs2(0)
ipt=Request.ServerVariables("Remote_Addr")
set rs=server.CreateObject("adodb.recordset")
rs.open"select * from IP where ip='"&ipt&"'",conn,1,3
if not rs.eof then
rs("ipcounter")=rs("ipcounter")+1
rs("datesj")=now()
if rs("ipcounter")=c then
rs("kill_ip")=true
end if
rs.update
else
rs.addnew
rs("ip")=ipt
rs("ipcounter")=1
rs.update
end if
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
是不是想做 多表连结查询,这个是 sql 基础
select a.Field,a.field1,b.field,b.field1 from table as a,table1 as b where a.field=b.field
select a.Field,a.field1,b.field,b.field1 from table as a,table1 as b where a.field=b.field
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
把语句写到存储过程吧,要不分开做。什么数据库?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询