高手帮帮忙,关于HTML中调用ASP的问题

zodrao 2010-07-11 03:02:21
本人用的是MSSQL,想在HTML中调用ASP,在用ASP调用时的没问题,显示
document.write ("本日:9 本周:11 本月:12 总数:61 ");

但是在HTM中调用
<script language="javascript" src="hits.asp?id=14013"></script>
却是显示空白.我猜可能是用FUNCTION或CLASS的问题,小弟不才.哪位大侠能帮我改下能在HTML下正常显示啊

HITS.ASP代码如下
<!-- #include file="conn.asp" -->
<!-- #include file="cls_main.asp" -->

<%

dim obj
set obj = New hits
obj.AspInit()


class hits

Private ID, i, Mesky
Private Sub Class_Initialize()
Set Mesky = New Cls_Main
End Sub
Private Sub Class_Terminate()
Set Mesky = Nothing
End Sub
Public Sub AspInit()

If Request.QueryString("ID") = "" Then
Response.Write "非法操作!指定的参数不正确。"
Response.End
ElseIf IsNumeric(Request.QueryString("ID")) = False Then
Response.Write "非法操作!指定的参数不正确。"
Response.End
Else
ID = CLng(Request.QueryString("ID"))
End If

call Mesky.LoadSetting()
If Mesky.Setting(80) = 1 Then
Response.Write showDownload(ID, Mesky.Setting(81), 1)
Else
Response.Write showDownload(ID, Mesky.Setting(81), 0)
End If

End Sub

'点击数
Private Function showDownload(ID, brNum, show)
Dim sR, aRs, s1, i
Set sR = Mesky.Execute("select * from Mesky_Down_Resource where ID=" & ID & " ")

AllHits = sR("HitsTotal")
DayHits = sR("HitsToday")
WeekHits = sR("HitsWeek")
MonthHits = sR("HitsMonth")


Response.Write "document.write ("& Chr(34) &"本日:"& DayHits &" 本周:"& WeekHits &" 本月:"& MonthHits &" 总数:"& AllHits &" "& Chr(34) &");"


End Function
End class%>


...全文
30 点赞 收藏 3
写回复
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
ChinaXtHuLang 2010-07-11
[Quote=引用 2 楼 lzp4881 的回复:]


Response.Write "document.write ("& Chr(34) &"本日:"& DayHits &" 本周:"& WeekHits &" 本月:"& MonthHits &" 总数:"& AllHits &" "& Chr(34) &");"

这行改成

show……
[/Quote]
同意。下面已经输出。那里还弄一个输出做什么.
回复
lzp4881 2010-07-11

Response.Write "document.write ("& Chr(34) &"本日:"& DayHits &" 本周:"& WeekHits &" 本月:"& MonthHits &" 总数:"& AllHits &" "& Chr(34) &");"

这行改成

showDownload = "document.write ("& Chr(34) &"本日:"& DayHits &" 本周:"& WeekHits &" 本月:"& MonthHits &" 总数:"& AllHits &" "& Chr(34) &");"







回复
zodrao 2010-07-11
人呢?
回复
发动态
发帖子
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
社区公告
暂无公告