使用 QTP 在通用文件夹中创建通用文件

发布于 2024-07-10 07:07:50 字数 501 浏览 6 评论 0原文

我通过从 DataTable 中获取名称创建了一个通用文件夹:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
strdata = Datatable.Value("Column name", "Sheet")
fso.CreateFolder "C:\Documents and Settings\schoudar\Desktop\" & strdata

到目前为止我已经成功,但现在我想在此文件夹中保存文件,并且当我不这样做时文件夹名称会更改。 迭代次数。 所以我尝试使用 CaptureBitmap 文件:

Browser("Browser").CaptureBitmap "C:\Documents and Settings\Desktop\ & strdata\filename.bmp"

但它不起作用,所以请帮助我。

I created a generic folder by taking the name from DataTable:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
strdata = Datatable.Value("Column name", "Sheet")
fso.CreateFolder "C:\Documents and Settings\schoudar\Desktop\" & strdata

Till this I am successful but now I want to save a file in this folder and the folder name changes when I do no. of iterations. So I tried with CaptureBitmap file:

Browser("Browser").CaptureBitmap "C:\Documents and Settings\Desktop\ & strdata\filename.bmp"

But it is not working so please help me out.

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(1

望她远 2024-07-17 07:07:50

你遇到了什么错误?

只是猜测,修复引号和字符串附加:

Browser("Browser").CaptureBitmap "C:\Documents and Settings\Desktop\" & strdata & "\filename.bmp"

What error are you getting?

Just a guess, fix the quotes and string appends:

Browser("Browser").CaptureBitmap "C:\Documents and Settings\Desktop\" & strdata & "\filename.bmp"
~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文