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

我想问下,在asp中这段函数什么意思

Function listPages(LinkFile)
  if not (rs.eof and rs.bof) then
gopage=currentpage
totalpage=n
blockPage=Int((gopage-1)/10)*10+1

If LCase(Request.ServerVariables("HTTPS")) = "off" Then
    strTemp = "http://"
    Else
    strTemp = "https://"
    End If
    strTemp = strTemp & CheckStr(Request.ServerVariables("SERVER_NAME"))
    If Request.ServerVariables("SERVER_PORT") <> 80 Then strTemp = strTemp & ":" & CheckStr(Request.ServerVariables("SERVER_PORT"))
    strTemp = strTemp & CheckStr(Request.ServerVariables("URL"))
    lenstrTemp=len(strTemp)+1
if instr(left(linkfile,lenstrTemp),"?")>0 then

if blockPage = 1 Then
Response.Write " <span disabled>【←前10页 </span>&nbsp;"
Else
Response.Write(" <span disabled>【 </span> <a href=" & LinkFile & "&page="&blockPage-10&">←前10页 </a>&nbsp;")
End If
  i=1
  Do Until i > 10 or blockPage > n
    If blockPage=int(gopage) Then
Response.Write(" <font color=#FF0000>[ <b>"&bloc


相关问答:

ASP判断的问题,郁闷了!判断不出来!

HTML code:

dim jf
set conn=server.createobject("adodb.connection")
connstr="Driver={Sql Server};Server="&Sqlip&";Database="&Sqldb&";Uid="& ......

asp文件解密

我有一个asp源码,但是出现一个文件,我用asp解密都是乱码
请教

VBScript code:
??

 %# , #&')*)-0-(0%()(?

(((((((((((((((((((((((((( ......

win2003服务器 asp bmp验证码无法显示

IE 遨游 无法显示验证码
FF 可以正常显示

解决方案:(无效)
一、修改注册表,显示xbm格式的验证码
新建2k3.txt文件,复制下列代码并保存。
Windows Registry Editor Version 5.00
[HKEY_LOC ......

asp DateDiff 语法错误,大家帮忙看看

conn.execute("delete from online where DateDiff("&SqlChar&"s"&SqlChar&",lasttime,"&SqlNowString&")>"&OnlineTime&" " ......

假前最后一帖ASP调用VB组件

我用VB按MVC的构架写组件供ASP调用
BLL层
VB code:

Private Dal As New moonPotato_DAL
Public Sub inSertUser(Model As moonPotato_Model)
Dal.InSertCls (Model)
End Sub

ASP中调用
VB c ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号