2.8w+
社区成员
大家帮忙看一下这段代码`~~出现问题呀`~~~给高分呀`~
<!--#include file="path.asp"-->
<% if not isempty (request("page")) then
page=cint(request("page"))
else
page=1
end if
%>
<%
if request("zuozhe")<>"" then
zz1=request("zuozhe")
else
zz1=1
end if
%>
<%
set rs1=server.createobject("ADODB.recordset")
rs1.open "select * from new where zuozhe='"&zz1&"' order by new_id desc",con,1,1
set rs3=server.createobject("ADODB.recordset")
rs3.open "select * from new where zuozhe="&request("zuozhe"),con,1,1
%>
<HTML><HEAD><TITLE>新高新网络<%=zz1%>文学专栏</TITLE>
<SCRIPT language=javascript>
function popwin(url)
{
window.open(url,"","height=470,width=580,resizable=no,scrollbars=yes,status=no,toolbar=yes,menubar=no,location=no");
}
</SCRIPT>
<link rel="stylesheet" href="NEWS.CSS" type="text/css">
<link rel="stylesheet" href="NEWS.CSS" type="text/css">
<link rel="stylesheet" href="csdn.css" type="text/css">
</head>
<BODY text=#000000 bgColor=#ffffff topMargin=0 leftmargin="5">
<table width="750" border="0" cellspacing="0" cellpadding="0" align="center" height="29">
<tr>
<td background="banner/2002.gif" height="26"> </td>
</tr>
</table>
<table width="750" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="79" width="184"><img src="banner/logo.gif" width="105" height="111"></td>
<td height="79" width="436"><img src="banner/banner_shequ.jpg" width="497" height="60"></td>
<td height="79" width="130">
<div align="center"><font color="#000000"><a href="INDEX.asp">文学首页</a></font></div>
</td>
</tr>
</table>
<table width="750" border="0" cellspacing="1" cellpadding="0" align="center" height="202">
<tr>
<td bgcolor="#FFFFFF" valign="top" width="154" height="311">
<table width="62%" border="0" cellspacing="0" cellpadding="0" height="115" align="center">
<tr>
<td valign="top" height="96"><img src="banner/2_8-77-1586_20020514141935.jpg" width="100" height="125">
</td>
</tr>
</table>
<br>
</td>
<td width="593" align="center" valign="top" height="311">
<table width="100%" border="0" cellpadding="0" cellspacing="0" height="198">
<tr>
<td bgcolor="#FFFFFF" height="138" valign="top">
<table width="100%" border="0" cellpadding="4" cellspacing="1" height="42" align="center">
<tr>
<td bgcolor="#FFFFFF" width="62%" height="18"><%=rs3("zuozhe")%>文章标题
</td>
<td bgcolor="#FFFFFF" width="25%" height="18">
<div align="center">更新日期</div>
</td>
<td bgcolor="#FFFFFF" width="13%" height="18">
<div align="center">阅读过</div>
</td>
</tr>
<%if rs1.eof and rs1.bof then
response.write"<td colspan='3' bgcolor='#f3f3f3'> "&rs3("zuozhe")&"下还没有文章呢，等你来投稿呢！^_^</td>"
response.end
else
const size=15
rs1.pagesize=size
rsnum=rs1.recordcount
totlepage=int(rsnum/size)
if (rsnum mod size)>0 then totlepage=totlepage+1
if page<1 or page>totlepage then page=1
rs1.absolutepage=page
while not rs1.eof and num<size
%>
<tr bgcolor="#FFFFCC">
<td width="62%" height="18" bgcolor="#FFFFFF" >
<% if len(trim(rs1("biaoti")))>30 then%>
.<a href="news.asp?new_id=<%=cstr(rs1("new_id"))%>" target="_blank"><%=mid((trim(rs1("biaoti"))),1,30)%>...</a>
<%else%>
.<a href="news.asp?new_id=<%=cstr(rs1("new_id"))%>" target="_blank"><%=trim(rs1("biaoti"))%></a>
<% end if
if rs1("img")=1 then
response.write "<img src='images/img.gif' border=0 width=16 height=16 align=middle>"
end if
select case right(rs1("href"),4)
case ".ace"
response.write "<img src='images/ace.gif' border=0 width=16 height=16 align=middle>"
case ".zip"
response.write "<img src='images/zip.gif' border=0 width=16 height=16 align=middle>"
case ".rar"
response.write "<img src='images/rar.gif' border=0 width=16 height=16 align=middle>"
case ".exe"
response.write "<img src='images/exe.gif' border=0 width=16 height=16 align=middle>"
case ".mp3"
response.write "<img scr='images/winamp.gif' border=0 width=16 height=16 align=middle>"
case ".rm"
response.write "<img scr='images/real.gif' border=0 width=16 height=16 align=middle>"
end select
%>
<%dim two_d
two_d=DateDiff( "d", CDate(rs1("time")), Now)
if two_d<=3 then
%>
<img src="IMAGES/newdd.gif" width="28" height="11">
<%
end if
%>
<a href="aa.htm"> </a></td>
<td width="25%" height="18" bgcolor="#FFFFFF">
<div align="center"><%=rs1("time")%></div>
</td>
<td width="13%" height="18" bgcolor="#FFFFFF">
<div align="center"><%=rs1("dianji")%></div>
</td>
</tr>
<% rs1.movenext
num=num+1
wend
rs1.close
set rs1=nothing
end if%>
</table>
<p class="middle"> </p>
</td>
</tr>
</table>
<div align="left">
<%select case page
case 1:
%>
<div align="right"><a href="zuozhe.asp?zuozhe=<%=rs3("zuozhe")%>&page=2">下一页</a>=-=第<%=page%>页/共<%=totlepage%>页
每页<%=size%>篇文章
<%
case totlepage:
%>
<a href="zuozhe.asp?zuozhe=<%=rs3("zuozhe")%>&page=<%=page-1%>">上一页</a>=-=第<%=page%>页/共<%=totlepage%>页
每页<%=size%>篇文章
<% case else: %>
<a href="zuozhe.asp?zuozhe=<%=rs3("zuozhe")%>&page=<%=page+1%>">下一页</a>=-=<a href="zuozhe.asp?zuozhe=<%=rs3("zuozhe")%>&page=<%=page-1%>">上一页</a>第<%=page%>页/共<%=totlepage%>页
每页<%=size%>篇文章
<%end select%>
<%rs3.close
set rs3=nothing%>
</div>
</div>
</td>
</tr>
</table>
<p align="center"><b><font size="2"> </font></b></p>
</BODY></HTML>
<% if not isempty (request("page")) then
page=cint(request("page"))
else
page=1
end if
%>
<%
if request("zuozhe")<>"" then
zz1=request("zuozhe")
else
zz1=1
end if
%>
<%
set rs1=server.createobject("ADODB.recordset")
rs1.open "select * from new where zuozhe='"&zz1&"' order by new_id desc",con,1,1
set rs3=server.createobject("ADODB.recordset")
rs3.open "select * from new where zuozhe="&request("zuozhe"),con,1,1
%>
<HTML><HEAD><TITLE>新高新网络<%=zz1%>文学专栏</TITLE>
<SCRIPT language=javascript>
function popwin(url)
{
window.open(url,"","height=470,width=580,resizable=no,scrollbars=yes,status=no,toolbar=yes,menubar=no,location=no");
}
</SCRIPT>
<link rel="stylesheet" href="NEWS.CSS" type="text/css">
<link rel="stylesheet" href="NEWS.CSS" type="text/css">
<link rel="stylesheet" href="csdn.css" type="text/css">
</head>
<BODY text=#000000 bgColor=#ffffff topMargin=0 leftmargin="5">
<table width="750" border="0" cellspacing="0" cellpadding="0" align="center" height="29">
<tr>
<td background="banner/2002.gif" height="26"> </td>
</tr>
</table>
<table width="750" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="79" width="184"><img src="banner/logo.gif" width="105" height="111"></td>
<td height="79" width="436"><img src="banner/banner_shequ.jpg" width="497" height="60"></td>
<td height="79" width="130">
<div align="center"><font color="#000000"><a href="INDEX.asp">文学首页</a></font></div>
</td>
</tr>
</table>
<table width="750" border="0" cellspacing="1" cellpadding="0" align="center" height="202">
<tr>
<td bgcolor="#FFFFFF" valign="top" width="154" height="311">
<table width="62%" border="0" cellspacing="0" cellpadding="0" height="115" align="center">
<tr>
<td valign="top" height="96"><img src="banner/2_8-77-1586_20020514141935.jpg" width="100" height="125">
</td>
</tr>
</table>
<br>
</td>
<td width="593" align="center" valign="top" height="311">
<table width="100%" border="0" cellpadding="0" cellspacing="0" height="198">
<tr>
<td bgcolor="#FFFFFF" height="138" valign="top">
<table width="100%" border="0" cellpadding="4" cellspacing="1" height="42" align="center">
<tr>
<td bgcolor="#FFFFFF" width="62%" height="18"><%=rs3("zuozhe")%>文章标题
</td>
<td bgcolor="#FFFFFF" width="25%" height="18">
<div align="center">更新日期</div>
</td>
<td bgcolor="#FFFFFF" width="13%" height="18">
<div align="center">阅读过</div>
</td>
</tr>
<%if rs1.eof and rs1.bof then
response.write"<td colspan='3' bgcolor='#f3f3f3'> "&rs3("zuozhe")&"下还没有文章呢，等你来投稿呢！^_^</td>"
response.end
else
const size=15
rs1.pagesize=size
rsnum=rs1.recordcount
totlepage=int(rsnum/size)
if (rsnum mod size)>0 then totlepage=totlepage+1
if page<1 or page>totlepage then page=1
rs1.absolutepage=page
while not rs1.eof and num<size
%>
<tr bgcolor="#FFFFCC">
<td width="62%" height="18" bgcolor="#FFFFFF" >
<% if len(trim(rs1("biaoti")))>30 then%>
.<a href="news.asp?new_id=<%=cstr(rs1("new_id"))%>" target="_blank"><%=mid((trim(rs1("biaoti"))),1,30)%>...</a>
<%else%>
.<a href="news.asp?new_id=<%=cstr(rs1("new_id"))%>" target="_blank"><%=trim(rs1("biaoti"))%></a>
<% end if
if rs1("img")=1 then
response.write "<img src='images/img.gif' border=0 width=16 height=16 align=middle>"
end if
select case right(rs1("href"),4)
case ".ace"
response.write "<img src='images/ace.gif' border=0 width=16 height=16 align=middle>"
case ".zip"
response.write "<img src='images/zip.gif' border=0 width=16 height=16 align=middle>"
case ".rar"
response.write "<img src='images/rar.gif' border=0 width=16 height=16 align=middle>"
case ".exe"
response.write "<img src='images/exe.gif' border=0 width=16 height=16 align=middle>"
case ".mp3"
response.write "<img scr='images/winamp.gif' border=0 width=16 height=16 align=middle>"
case ".rm"
response.write "<img scr='images/real.gif' border=0 width=16 height=16 align=middle>"
end select
%>
<%dim two_d
two_d=DateDiff( "d", CDate(rs1("time")), Now)
if two_d<=3 then
%>
<img src="IMAGES/newdd.gif" width="28" height="11">
<%
end if
%>
<a href="aa.htm"> </a></td>
<td width="25%" height="18" bgcolor="#FFFFFF">
<div align="center"><%=rs1("time")%></div>
</td>
<td width="13%" height="18" bgcolor="#FFFFFF">
<div align="center"><%=rs1("dianji")%></div>
</td>
</tr>
<% rs1.movenext
num=num+1
wend
rs1.close
set rs1=nothing
end if%>
</table>
<p class="middle"> </p>
</td>
</tr>
</table>
<div align="left">
<%select case page
case 1:
%>
<div align="right"><a href="zuozhe.asp?zuozhe=<%=rs3("zuozhe")%>&page=2">下一页</a>=-=第<%=page%>页/共<%=totlepage%>页
每页<%=size%>篇文章
<%
case totlepage:
%>
<a href="zuozhe.asp?zuozhe=<%=rs3("zuozhe")%>&page=<%=page-1%>">上一页</a>=-=第<%=page%>页/共<%=totlepage%>页
每页<%=size%>篇文章
<% case else: %>
<a href="zuozhe.asp?zuozhe=<%=rs3("zuozhe")%>&page=<%=page+1%>">下一页</a>=-=<a href="zuozhe.asp?zuozhe=<%=rs3("zuozhe")%>&page=<%=page-1%>">上一页</a>第<%=page%>页/共<%=totlepage%>页
每页<%=size%>篇文章
<%end select%>
<%rs3.close
set rs3=nothing%>
</div>
</div>
</td>
</tr>
</table>
<p align="center"><b><font size="2"> </font></b></p>
</BODY></HTML>
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
zhyoli 2002-05-20
zuozhe 是字符型的`~~~
new 是表的名字`~~~
new 是表的名字`~~~
ywz413 2002-05-17
new 是关键字
hiflash 2002-05-17
zuozhe段这个字是什么类型的？
zhyoli 2002-05-17
楼上的有出现错误`~~
错误类型：
ADODB.Field (0x80020009)
/hotweb1/zuozhe.asp
出现以下错误~~
错误类型：
ADODB.Field (0x80020009)
/hotweb1/zuozhe.asp
出现以下错误~~
ChinaOk 2002-05-17
rs3.open "select * from new where zuozhe="&request("zuozhe"),con,1,1
没有引号
rs3.open "select * from new where zuozhe='"&request("zuozhe")&"'",con,1,1
没有引号
rs3.open "select * from new where zuozhe='"&request("zuozhe")&"'",con,1,1
ChinaOk 2002-05-17
smallbugs()
你要管吗/
什么都没有，你爱看自己去看。
你要管吗/
什么都没有，你爱看自己去看。
zhyoli 2002-05-17
不好意思`~可能是我的表达能力不好`~~~~~~心里知道，表达不出来`~~~
请大家不要生气了`~~~~
我的意思是`~~让这个页面获取上个页面传过来的变量，查找到符合这个条件的记录，然后分页显示~~~~~~~~
请大家不要生气了`~~~~
我的意思是`~~让这个页面获取上个页面传过来的变量，查找到符合这个条件的记录，然后分页显示~~~~~~~~
smallbugs 2002-05-17
这行吗?set rs3=server.createobject("ADODB.recordset")
zhyoli 2002-05-17
这是出错类型，包含文件是数据库路径文件，没有问题~~这个页面的主要功能是，查找上个页面传过来的变量~~~然后分页显示~~~~~~~~
可能在自身提交的时候出了问题~~~就是变量之间搞糊涂了~~所以请大家看看，~~谢谢`~~
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
/hotweb1/zuozhe.asp, 第 19 行
浏览器类型：
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)
页：
GET /hotweb1/zuozhe.asp
可能在自身提交的时候出了问题~~~就是变量之间搞糊涂了~~所以请大家看看，~~谢谢`~~
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
/hotweb1/zuozhe.asp, 第 19 行
浏览器类型：
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)
页：
GET /hotweb1/zuozhe.asp
yzx_zyj 2002-05-17
问题应该问到点子上，别人帮你解决就能快点。。。。
smallbugs 2002-05-17
ChinaOK(授人以鱼，不如授人以渔)
啥意思你？
啥意思你？
jxwangzhigang 2002-05-17
那里出了问题
给点报错信息！
太长了，眼神不好！
给点报错信息！
太长了，眼神不好！
ChinaOk 2002-05-17
让大家跟你学习吗？
smallbugs 2002-05-17
<!--#include file="path.asp"-->这个包含文件是做什么的？
smallbugs 2002-05-17
你的数据库连接在哪？
set conn=server.createobject("adodb.connection")
set conn=server.createobject("adodb.connection")
html压缩图片显示不全的问题,高分求助：html页面图片自动设置按照原大小显示，超过设定值就压缩显示，请大家帮忙_html/css_WEB-ITnose... HTML 图片 页面图片地址是： ...页面源代码如下：介绍： {$info.content} {foreach from=$image item=image} {/foreach} 我需要的效果就像赶集网那样子分辨率较小的图片的时候自动按照...
Thinkpad常见问题大全（转载联想工程师博客） 想要收藏本篇文章请下载Word版 Q：我想升级成VISTA，想问一下，升级之后一键恢复是恢复到XP还是VISTA?A：如果从隐含分区恢复出厂设置，那当然是恢复到出厂时预装的系统；如果是用R&
什么是代码质量 怎么说，项目是跑起来没问题了，但是一年多了，随着业务逻辑越来越复杂，交易量越来越大，加上系统服务器也出现的一些问题，bug也越来越多的涌现出来，是涌现，一出就是一堆bug，本来bug也不...
清华梦的粉碎——写给清华大学的退学申请 她指着一个大哥哥的照片对我说，这是爸爸的学生，他考上了清华大学，他是我们中学的骄傲。长大后，你也要进入清华大学读书，为我们家争光。我不知道清华是什么样子，但是我知道爱迪生和牛顿的故事。清华，大概就是...
[Python图像识别] 四十五.目标检测入门普及和ImageAI“傻瓜式”对象检测案例详解 (1) 如上图所示（引用yegeli老师，推荐大家关注），目标检测主要是实现分类问题和定位问题的叠加。其核心问题即： 分类问题：确定图片（或某个区域）中的图像属于哪个类别。 定位问题：目标可能出现在图像的任何位置。 ...
控制 计算机某个程序自动开关,电脑自动开关机软件(示例代码) 我的本遇到的就是这个问题 更新日志 电脑自动开机软件 v1.0.47更新内容 修复-有时不能自动开机的问题 修复-部分机型不能自动关机的问题 修复-字体在高分辨率下的显示 修复-部分机型自动开机后屏幕不亮的问题 修复-...
java高分面试指南：最新美团点评Java团队面试题 Java面试精选题、架构实战文档：传送门 整理不易，觉得有帮助的朋友可以帮忙点赞分享支持一下小编~ 总结 对于面试还是要好好准备的，尤其是有些问题还是很容易挖坑的，例如你为什么离开现在的公司（你当然不应该...
考中国科学院计算机所研究生,报考中国科学院计算机所(北京)的研究生,大家帮忙找找相关资料好吗?... 我的朋友今年考到中科院计算机,这是他的经验给你参考:前几天从北京回来,很幸运,自己被录取了。不是被计算所,而是调剂到了本部的信息学院 毕竟也能上研了,自己的心还是踏实了许多。我不是很成功,但我所经历的这些所...
你好，我是程序员 前言 最近大部分人都开工了，大部分人的假期已经...保守一点的亲友可能有的不知道计算机是个啥，还会追问具体是干嘛的，我们会说在电脑前敲代码的。对方一句长 哦……装懂而不失智慧和阅历的体面。知道你是学电脑之后他
几千行代码就能搞定，你为什么要写几万行？ 在重写这个程序的这段期间，前两个月，我每周花在这个程序上的时间应该不会超过四个小时。 后来我趁着农历新年没事干，跑到公司加班数天，但是一天写程序的时间也不会超过四个小时。 通常我白天写两、三个小时的程序...
阿里技术官熬夜整合630页高分宝典：算法+数据结构+网络+操作系统 分享Java技术文以及学习经验也有一段时间了，实际上...所以花了一个星期，整理了这份630页的"高分宝典"，主要涉及算法、数据结构、网络、操作系统等几个部分，以及我个人的一些面试经历，希望能够对大家提升自己有所帮
史上最全App瘦身实践 目标业务方和开发都希望app尽量的小，本文会给出多个实用性的技巧来帮助开发者进行app的瘦身工作。瘦身和减负虽好，但需要注意瘦身对于项目可维护性的影响，建议根据自身的项目进行技巧的选取。...
Unity3d 周分享（21期 2019.7.30 ） 可以把 C:\Program Files\Microsoft Office\root\vfs\ProgramFilesX86\Microsoft Office\Office16\DCF 整个路径拷贝到其它地方或者 分享给其他组员使用（测试没有问题）。 3、 ...
这些年，我身边的那些人和事 引言 2013年的8月13日，群主打开自己的QQ，建立了第一个技术交流群，也...为了给大家一个一起交流的地方，群主便顺手建了一个QQ群。 谁曾想，3年半过去了，这个无意之中建立的QQ群，不止见证了群主的成长，也
去中心化应用：区块链技术概述 在这本实用指南中，作者解释了为什么去中心化应用（dapp）将比现在最流行的 Web 应用得到更广泛的使用以及实现更多盈利，展示了如何使用现有工具来创建可用的 dapp 及其市场，并研究了目前两个成功的 dapp 案例。...
《那些年啊，那些事——一个程序员的奋斗史》二 ”段伏枥写完计算器没多久，同事老柳突然跑过来说要帮忙看看代码。 “查表？”段伏枥隐约记得，用查表的方式来计算除法，在没有除法器的单片机上为了加快运算速度是常用的方式。只不过在现在公司所用的夏普LH...
难以理解的软件工程师：几千行代码能搞定为什么要写几万行？ 难以理解的软件工程师：几千行代码能搞定为什么要写几万行？ 导读：“所以程序高手原本就不多，而一直继续在写程序的程序高手就更是稀有了。”本文是一位从业多年的软件工程师分享的经验和看法，他提到的一些...
Pytorch 使用GAN实现二次元人物头像生成 保姆级教程（数据集+实现代码+数学原理） Pytorch 使用DCGAN实现二次元人物头像生成（实现代码+公式推导） GAN介绍 算法主体 推导证明(之后将补全完整过程) 随机梯度下降训练D,G DCGAN介绍及相关原理 Pytorch实现二次元人物头像生成 ...
