asp代码翻译
<!--#includefile="const.asp"--><%Functionmaindimrs,sql,i,idid=Request.QueryString("id...
<!--#include file="const.asp"-->
<%Function main
dim rs,sql,i,id
id=Request.QueryString("id")
if id="" then id=0
if not isnumeric(id) then id=0
id=clng(id)
Set Rs = Server.CreateObject("Adodb.Recordset")
Sql = "select name,title,Reply,[time],user,[nid] from xywap_ly where id="&id
Rs.Open Sql,conn,1,1
if not (rs.bof and rs.eof) then
%> 展开
<%Function main
dim rs,sql,i,id
id=Request.QueryString("id")
if id="" then id=0
if not isnumeric(id) then id=0
id=clng(id)
Set Rs = Server.CreateObject("Adodb.Recordset")
Sql = "select name,title,Reply,[time],user,[nid] from xywap_ly where id="&id
Rs.Open Sql,conn,1,1
if not (rs.bof and rs.eof) then
%> 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询