易截截图软件、单文件、免安装、纯绿色、仅160KB

asp从数据库中输出的东西换行

 <%  
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from 0791idc_News where BigClassName='家装课堂' order by ID desc"
rs.Open sql,Conn,1,1
if rs.eof and rs.bof then
  response.Write("暂时没有记录")
else
%>
                <%
rs.PageSize=15 
for j=1 to rs.PageSize
ViewList=3
%>
  <td width="33%">
   <table width="100%"  border="0" align="center" cellpadding="3" cellspacing="0">
             <tr>
                 <td width="5%" height="27">&nbsp;</td>
                 <td width="5%" valign="middle" style="border-bottom:1px dotted #9b7022;"><img src="images/a.gif" width="9" height="9"/></td>
                   <td width="85%" align="left" valign="middle" style="border-bottom:1px dotted #9b7022;"><div align="left" style="margin-left:5px;"><a href="shownews.asp?id=<%= RS("id") %>&BigClass=<%=RS("BigClassName")%>" target="_blank" title="<%= RS("TITLE") %>"><%=cutstr (rs("title"),15)%></a></div></td>
                    <td width="5%">&nbsp;</td>
    </tr>                      
         </table>
<%
if j mod ViewList =0 then
response.Write"</td></tr>"
else
response.Write"&


相关文档:

ASP生成静态Html首页源代码(超精简)

<%
'调试:JAVA中文网:www.javaweb.cc/
'注意,按照所放置的目录不同请修改objXmlHttp和生成首页路径
dim objXmlHttp,binFileData,objAdoStream
set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET","http://"&request.ServerVariables("HTTP_HOST")&"/index.asp",false ......

用VB编写ActiveX DLL实现ASP编程

ASP是目前一种广为应用的用来快速构建动态WEB站点的编程语言,默认的内置开发语言是VBScript,由于ASP和微软Windows系列操作系统的结合非常的好,使得ASP已经成为了NT开发平台上面进行WEB开发的首选语言和环境。
他有着简单易学,方便快速开发的种种优点,但是他也有着致命的弱点,就是他是脚本语言解释执行的,速度会受到 ......

asp连接数据库代码

发一个标准的数据库连接代码。希望对大家有帮助。
<%
option explicit
dim startime,endtime,conn,connstr,db
startime=timer()
'更改数据库名字
db="data/dvBBS5.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data&n ......

asp验证码(加法运算)

在提交页面中验证session("GetCode")
<%@CodePage="65001"%>
<%
Call Com_CreatValidCode("GetCode")
Sub Com_CreatValidCode(pSN)
    ' 禁止缓存
    Response.Expires = -9999 
    Response.AddHeader "Pragma","no-cache"
  &nb ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号