51Testing软件测试论坛

标题: 这个报错怎么回事？ [打印本页]

作者: mustwangrong 时间: 2008-5-6 17:12
标题: 这个报错怎么回事？
Run Error:Invalid characterLine (1)
代码如下
datatable.ImportSheet "C:\excelsheet\login2.xls", "Login", "Action1"
CommonLogin(1)
executefile "[QualityCenter] Subject\Satal\Windows 2K / IE6.0\QTP\PB=P+B.vbs"
executefile "[QualityCenter] Subject\Satal\Windows 2K / IE6.0\QTP\PB=APro.vbs"

运行的时候，看到sheet已经导进datatable了。但是commonlogin后executefile之前，又从第一行执行。

[ 本帖最后由 mustwangrong 于 2008-5-8 18:05 编辑 ]

作者: 没有蛀牙 时间: 2008-5-6 17:19
没有找出什么错误

这句：CommonLogin(1)
是什么意思？

作者: mustwangrong 时间: 2008-5-7 10:34
标题: 回复 2# 的帖子
自定义的函数
有没有什么设置,让每次executefile都importsheet?

作者: dreamever 时间: 2008-5-7 13:10
不知道报什么错误，如果能把那个函数的代码和错误信息贴出来就好了。

作者: mustwangrong 时间: 2008-5-7 14:48
Public Function CommonLogin(InputData)
Dim i
i=InputData
Select Case i
case 1:
datatable.LocalSheet.SetCurrentRow(1)
case 2:
datatable.LocalSheet.SetCurrentRow(2)
case 3 :
datatable.LocalSheet.SetCurrentRow(3)
case 4 :
datatable.LocalSheet.SetCurrentRow(4)
End Select
Browser("FIN DIRECT").Page("FIN DIRECT").WebEdit("user").Set datatable("LoginID", "Action1")
Browser("FIN DIRECT").Page("FIN DIRECT").WebEdit("passwd").Set ("welcome1")
Browser("FIN DIRECT").Page("FIN DIRECT").WebCheckBox("SAVE").Set "OFF"
Browser("FIN DIRECT").Page("FIN DIRECT").Image("signon").Click 27,5
Browser("FIN DIRECT").Page("FIN DIRECT_2").Frame("MainToolbar").Link("sp").Click
End Function

Public Function CommonLogout()
Browser("FIN DIRECT").Page("FIN DIRECT").Frame("MainToolbar").Link("Sign Off").Click
End Function
这个vbs是加在resourse里的
执行完成login后又importsheet一次!!

[ 本帖最后由 mustwangrong 于 2008-5-7 16:15 编辑 ]

作者: mustwangrong 时间: 2008-5-8 14:41
上图
执行完import 和login后又回到第一行去，循环的原因吗？高手请赐教

作者: wyy83 时间: 2008-5-8 17:00
datatable.ImportSheet "C:\excelsheet\login2.xls", "Login", "Action1"

ImportSheet filename ,sheetsource, sheetdest

sheet的源和目的表顺序没弄错吧

作者: wyy83 时间: 2008-5-8 17:11
Browser("FIN DIRECT").Page("FIN DIRECT").WebEdit("user").Set datatable("LoginID", "Action1")中的Action1是不是已经被导入的Login替换掉了,所以找不到?

作者: mustwangrong 时间: 2008-5-9 09:45
标题: 回复 8# 的帖子
这个语句已经成功执行了Commonlogin也没有问题
关键是Commonlogin()之后又重新回到第一行执行了-_-#

作者: xiaodong 时间: 2008-5-9 10:24
Select Case i
case 1:
      datatable.LocalSheet.SetCurrentRow(1)
case 2:
      datatable.LocalSheet.SetCurrentRow(2)
case 3 :
      datatable.LocalSheet.SetCurrentRow(3)
case 4 :
      datatable.LocalSheet.SetCurrentRow(4)
End Select

直接用datatable.LocalSheet.SetCurrentRow(i)不行吗?这段写的没有必要.

作者: mustwangrong 时间: 2008-5-12 09:41
标题: 回复 10# 的帖子
呵呵，这样改不错，但是如果把123换成各种角色名字,admin...
不过我的问题还是没有解决,论坛乏人啊

作者: mustwangrong 时间: 2008-5-13 10:10
和executefile有关
把里面的代码靠出来就不会回到首行
研究中...这个论坛...唉

作者: zte_boy 时间: 2008-5-13 10:39
搞不懂楼主的意图
为什么要“执行完成login后又importsheet一次!!”？
你执行完Commonlogin后又importsheet，把原来的sheet重新覆盖了，当然每次都从第一行执行啊
如果你是要执行全部用户的话，你导入一次，再做循环不就好了
最后在deletesheet不就好了

作者: mustwangrong 时间: 2008-5-13 10:47
标题: 回复 13# 的帖子
我没有想要“执行完成login后又importsheet一次!!”
我现在就是这样的
我想解决这个问题
好像是executefile的问题...

作者: mustwangrong 时间: 2008-5-15 11:50
没人知道？
顶一下

作者: makanmakan 时间: 2008-6-30 16:26
同样问题，
比如我做了一个 action 1
里面执行
Option Explicit
dim aaa,bbb,ccc
executefile "c:\aaa.vbs"

aaa.vbs内容如下：
msgbox("test1")
每次运行都会出现 run error:不正確的字元光标跳到option explicit这边

希望有人可以解答

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)