站内搜索
分类列表
本类阅读排行
本类推荐文章
- ASP技巧:让Len,Left,Right函数识...
- 用ASP实现IE地址栏参数的判断
- 如何实现ASP.NET网站个性化
- 如何在Asp.net中使用HtmlArea编辑...
- 用ASP.Net实现在线压缩和解压缩
- ASP实现不存在的网页就自动发送邮...
- 用ASP取出HTML里面的图片地址的函...
- asp.net跳转页面的三种方法比较
- 一个Winsock组件
- 用WinSock设计Chat程序(转)
- 在MFC应用中深入定制WebBrowser控...
- 这几天有人问关于编应.dll的问题,...
- 在Visual J++中编写ASP COM组件(转...
- 一个显示Grid的VBScript对象
- 好东西,快来看呀:(转载自中华网...
广告
Easy Debugging of Variables by Charles Carroll
作者: 来源: 点击: 日期:2007-4-19 23:41:06
This page demonstrates how you can print several variables in one step without resorting to:
<%
response.write "fname=<b>" & fname & "</b><br>"
response.write "lname=<b>" & lname & "</b><br>"
response.write "x=<b>" & x & "</b><br>"
response.write "y=<b>" & y & "</b><br>"
%>
by taking advantage of VB Eval and encapsulating it into a subroutine to do all the work for you.
<Test Script Below>
<html><head>
<title>debug1.asp</title>
</head><body bgcolor="#FFFFFF">
<%
fname="Jennifer"
lname="Jones"
x=9
y=7
Call ShowVars("fname,lname,x,y")
%>
</body></html>
<!--#include file="lib_debug1.asp"-->
The library that does the work:
<%
SUB ShowVars(parmVars)
dim myparameters
myparameters=SPLIT(parmVars,",")
parmcount=ubound(myparameters)
for counter=0 to parmcount
thisvar=myparameters(counter)
strexec=thisvar
strexec=eval(strexec)
strall=strall & "<b>" & thisvar & "</b>=" & strexec & "<br>"
next
response.write strall
END SUB
%>
Easy Debugging of Variables by Charles Carroll 评论
