如何将每次参数化的数据显示出来

wyqwyq

参数化应用程序中两端口值，port1 & port2。

在每一组参数执行中，如何获取参数的具体值？

Dialog("wiz").WinEdit("Port Ranges :").SetSelection 0,4
Dialog("wiz").WinEdit("Port Ranges :").Set DataTable("port1", dtGlobalSheet)
wait 1
Dialog("wiz").WinEdit("-----").SetSelection 0,4
Dialog("wiz").WinEdit("-----").Set DataTable("port2", dtGlobalSheet)

附件 :data table中参数化port1 & port2 截图

向同仁们请教，谢谢！

oscarli

还不是很明白你的意思！

你是想问在脚本运行过程中：对于多个参数化是怎么样取值吗？我以前测试发现，他们是按照一行一行取值。每运行一次，取一次值，直到有多个少参数运行多次，参数取完，运行完就退出了！！

wyqwyq

楼上说的我明白。

我的意思就是取完一行参数，用msgbox 或其它方法把它的值显示出来。

比如data table中，这一行 port1：5000，port2：5100.  读取完这行参数，然后用什么方法显示出来，port1：5000，port2：5100

wyqwyq

原帖由 wyqwyq 于 2007-11-23 17:16 发表
楼上说的我明白。

我的意思就是取完一行参数，用msgbox 或其它方法把它的值显示出来。

比如data table中，这一行 port1：5000，port2：5100.  读取完这行参数，然后用什么方法显示出来，port1：5000，port2：5 ...

因为设置了很多组参数，想在log日志中查看具体哪一组参数运行出错？

marygao929

dim port
port=Dialog("wiz").WinEdit("Port Ranges :").getroproperty("value")
msgbox port

linwenyan

print "port1:"&"   "& DataTable("port1", dtGlobalSheet)&chr(13)&chr(10) &"port2:"&"   " &DataTable("port2", dtGlobalSheet)&chr(13)&chr(10)

xazaj

小林很专业 ^_^，如果还要代码更直观一点可以先赋个值再打印：
Dim port1,port2
port1 = DataTable("port1", dtGlobalSheet)
port2 = DataTable("port2", dtGlobalSheet)
print "port1:"&"   "& port1 & chr(13)&chr(10) &"port2:"&"   " & port2 &chr(13)&chr(10)

xazaj

这种参数化带循环的值一般不用msgbox  因为每次都会弹出消息框你不点他他就不会消失程序也就停在这里，如果特殊需要点了才继续运行下面的，比如值比较长要人工比对用msgbox也不错，不过这样就没有自动化的意义了！
msgbox的程序只需要把print改成msgbox就可以了！

wyqwyq

好的，问题已解决。非常感谢楼上的各位: