51Testing软件测试论坛

标题: 怎么写文件和获取一个链接的地址 [打印本页]

作者: zhufeirinui 时间: 2006-12-21 10:44
标题: 怎么写文件和获取一个链接的地址
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("c:\Log.txt")
MyFile.WriteLine("This is a test.")
MyFile.Close

总是执行到MyFile.WriteLine("This is a test.")就说有错
还有，我想获得一个页面中一些链接的地址，可不可以不要点链接，一进页面
就直接得到链接地址（因为我想要根据URL来判断权限）
如果不能，那应该怎么做啊
求各位大哥，大姐，指点下

作者: xiaonan 时间: 2006-12-21 10:53
Dim fso, myfile
Set fso=CreateObject("Scripting.FileSystemObject")
Set myfile=fso.openTextFile("C:\result1.txt",8,false)
myfile.writeline "orderno"
myfile.close

写文件,其实帮助里都有例子的.

要取连接地址,先要把这些连接加入的对象库中,然后用GetROProperty("属性")取相应的属性值.

作者: maguschen 时间: 2006-12-21 10:57
你的程序我可以成功运行
你可以查查你这个WINDOWS登陆的用户的权限，是不是你没有写C盘根目录的权限？换别的目录试一下

第二个问题你是在QTP下做么？那可以用描述性编程。
假如有个连接叫 “管理员”（假如而已啊）
strLink = browser(...).Page(...).Link("text:=管理员").GetROProperty("你想要的属性")

作者: zhufeirinui 时间: 2006-12-21 10:59
呵，先谢谢xiaonan ，我试下去

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