imacros调用文件CSV和数据库

调用csv文件

iMacros让您指定文本文件, CSV文件作为输入。
例如这样一个csv文件:
“ARTIST” , “ALBUM TITLE” , “PRICE”
“Beatles”, “Abbey Road”, “13.49″
“Beatles”, “The Beatles 1,2,3″ , “25.49″
“Mozart” , “Symphonies No.40 & 41″, “9.98″
“Mozart”, “Requiem”, “7.50″
这个文件的文件名为OnlineAuction.csv

我们现在需要告诉iMacros宏如何找到这个数据输入文件。为此,我们使用内置的变量!DATASOURCE
SET !DATASOURCE OnlineAuction.csv     默认路径是iMacros数据路径下的datasources文件夹。
SET !DATASOURCE_COLUMNS 3     设置iMacrosCSV文件有多少列,此数字必须完全匹配输入文件的列数
SET !LOOP 2   既然我们要插入的所有数据集,我们需要的宏循环来控制(不要?)
SET !DATASOURCE_LINE {{!LOOP}}       来设置读取文件的第几行。

现在,我们已经把准备工作都做好了。接下来我们要读取出对应的数据。
TAG TYPE=INPUT:TEXT FORM=Listing ATTR=NAME:Name CONTENT={{!COL1}}     {{!COL1}} 代表的是读取出对应的第一列数据
TAG TYPE=INPUT:TEXT FORM=Listing ATTR=NAME:Album CONTENT={{!COL2}}
TAG TYPE=INPUT:TEXT FORM=Listing ATTR=NAME:Price CONTENT={{!COL3}}

调用数据库文件

这个例子只适用于专业版。
iMacros可以直接从数据库读取数据。
这个例子中的代码Visual Basic脚本连接到Microsoft Access数据库:(ps:实际使用待测试)
‘ open database
set rs = CreateObject(“ADODB.Connection”)
rs.Open(“DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=” _& mypath & “IIM-TEST-SUBMIT.MDB”)
‘ use SQL to select information
sql = “select * from table1″
set rs = rs.Execute(sql)
‘ start iMacros
set iim1= CreateObject (“iMacros”)
iret = iim1.iimInit
iret = iim1.iimDisplay(“Submitting Data from MS ACCESS”)
‘ loop through result dataset
do until rs.eof
‘Set the variable
iret = iim1.iimSet(“-var_FNAME”, rs.fields(0))
iret = iim1.iimSet(“-var_LNAME”, rs.fields(1))
iret = iim1.iimSet(“-var_ADDRESS”, rs.fields(2))
iret = iim1.iimSet(“-var_CITY”, rs.fields(3))
iret = iim1.iimSet(“-var_ZIP”, rs.fields(4))
iret = iim1.iimSet(“-var_STATE-ID”, rs.fields(5))
iret = iim1.iimSet(“-var_COUNTRY-ID”, rs.fields(6))
iret = iim1.iimSet(“-var_EMAIL”, rs.fields(7))
‘Run the macro
‘Note: This is the SAME macro, as in the FILE-2-WEB-METHOD2.VBS example script!!!
iret = iim1.iimPlay(“wsh-submit-2-web”)
If iret < 0 Then
MsgBox iim1.iimGetLastError()
End If
rs.movenext
loop
iret = iim1.iimDisplay(“Done!”)
iret = iim1.iimExit
WScript.Quit(0)


新加评论 评论标题:

tyle="lie-height:1.5;"调用cv文件
调用数据库文件