如何上传动态添加的多个附件

赵佳乐SMILE

我感觉这个问题应该不难

不过第一次处理 有写摸不到头脑

初始时 只有一个webfile

然后点击添加后会多一个webfile

在点击又多一个

测试数据：测试附件.doc|测试附件.txt

用split可以拆分出两个附件名称了
也模拟了添加操作

但是我不知道如何来区分第二个webfile

还是说我这种测试数据的设计不合理

应该就是个对象库搞不明白的问题

1. Dim splitNum
   
2. For splitNum= 0 to ubound(arrTest)
   
3. print "arrTest(" & splitNum & ") = " & arrTest(splitNum)
   
4. 
   
5. If  splitNum>0 Then
   
6.         Browser("内容").Page("内容").Frame("mainFrame").WebButton("添加").Click
   
7. End If
   
8. Browser("内容").Page("内容").Frame("mainFrame").WebFile("attachmentForm.file").
   
9. Browser("内容").Page("内容").Frame("mainFrame_").WebFile("attachmentForm.file").Set attachmentFilePath & "\" & arrTest(splitNum)
   
10. Next

复制代码

lgh75560

推荐方法：

1：如果 浏览... 按钮的属性是完全一致的，使用 index来区分
2：如果 浏览... 按钮属性类似
name=add_01
name=add_02
直接使用
"name:=add_0" &i  来区分


提出的疑问，你那给
文件上传控件直接赋值，能通过么？（如果是IE控件，肯定是不能直接复制的，会有问题）

平时喜欢，描述性编程的路过

黑羽祭

回复 1# 赵佳乐SMILE


    使用属性index来区分12345

赵佳乐SMILE

回复 2# lgh75560


    跑一个附件 可以通过

赵佳乐SMILE

回复 3# 黑羽祭


    我感觉 可能要用描述性编程了
不可能每一个都加进对象库

加了3个 index确实在变 不过具体怎么用 我得学学

赵佳乐SMILE

搞定了 最后一句代码的.WebFile("attachmentForm.file")改成
.WebFile("name:=attachmentForm.file","index:="&splitNum)

谢谢大家。。。。。

赵佳乐SMILE

回复 2# lgh75560


    不知道我们用的啥控件 呵呵

黑羽祭

搞定了 最后一句代码的.WebFile("attachmentForm.file")改成
.WebFile("name:=attachmentForm.file","inde ...
赵佳乐SMILE 发表于 2013-2-1 13:50

    不错。有进步啊~

赵佳乐SMILE

回复 8# 黑羽祭


   难者不会 会者不难 我发现这个很简单啊。。。。。。

我都脸红 问这么 描述性编程的  初初级问题。。。

黑羽祭

回复 9# 赵佳乐SMILE


    不要怕撒~这很正常~

赵佳乐SMILE

回复 10# 黑羽祭


   嗯呢。。