Automate Overture Add Management, VBA Example Source Code


Home		Products		Purchase		Service & Support		Partner Programs		Contact Us

iMacros


Product Information

	Success Stories

	Compare Editions

	Web Image Recognition

	Press Reviews

	System Requirements

	Online User Manual

	Product Flyer (PDF)

Support

	Online Demos

	Code Samples

	Tutorials

	iMacros User Forum

FAQ

Buy iMacros

Customer Login

Support Ticket

Home > iMacros > Support > Generate Macros

Tutorial: Overture Account Management

Example code for the Overture Management Tutorial

1. The overture-addlisting.vbs Windows Script (Tell me more about WSH)

Simply click inside the window below, use your cursor to highlight the script, and copy (type Control-c) it into a new file in your text editor (such as Note Pad) and save the file with an ".VBS" extension.

Option Explicit

MsgBox ("Add Listing Tool")

'Tip: For more information on the method used here
'search for "Text File Driver" and "Schema.ini" in any search engine

Dim rs, sDir, strConnect
Dim iim1, iret

set rs = createobject("ador.recordset")
sDir =  Replace(WScript.ScriptFullName, WScript.ScriptName, "") 'Get current directory
strConnect = _
   "Driver={Microsoft Text Driver (*.txt; *.csv)};" & _
   "DefaultDir=" & sDir & ";"
Const adOpenStatic = 3
rs.open "select * from overture.csv", strConnect, adOpenStatic

MsgBox "Input file information:" & vbCrLf &  vbCrLf & _
"Recordcount: " & rs.recordcount & vbCrLf &  vbCrLf & _
"Fields per record: " & rs.fields.count

set iim1= CreateObject ("InternetMacros.iim")
iret = iim1.iimInit
iret = iim1.iimDisplay("Submitting Data")

do until rs.eof
   'Set the variables
   iret = iim1.iimSet("-var_CAR", rs.fields(0))
   iret = iim1.iimSet("-var_BID", rs.fields(1))
   iret = iim1.iimSet("-var_URL", rs.fields(2))
   'Run the macro
   iret = iim1.iimPlay("overture-addlisting")
   If iret < 0 Then
      MsgBox iim1.iimGetLastMessage()
   End If
   rs.movenext
loop

iret = iim1.iimDisplay("Done!")
iret = iim1.iimExit
WScript.Quit(0)

This script uses the "overture-addlisting.iim" macro.

2. The overture-addlisting.iim Macro

Simply click inside the window below, use your cursor to highlight the macro, and copy (type Control-c) it into a new file in your text editor (such as Note Pad) and save the file with an ".iim" extension.

VERSION BUILD=306821
' Step 1: Sign-in to http://www.overture.com manually.
' Step 2: Click the Add Listings tab in the Overture site.
' Step 3: Once the Add Listings page appears, copy the url in the location
' bar into your clipboard.
' Step 4: Replace the two pound symbols below with the text in your clipboard.
URL GOTO=##
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[0].rawST CONTENT={{CAR}}<SP>car<SP>parts
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[0].title CONTENT=Car<SP>parts<SP>for<SP>your<SP>{{CAR}}
TAG POS=1 TYPE=TEXTAREA FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[0].description CONTENT=Find<SP>affordable<SP>parts<SP>for<SP>your<SP>European<SP>sports<SP>car<SP>at<SP>Eurogenous.com.
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[0].url CONTENT={{URL}}
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[0].maxBid CONTENT={{BID}}
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[1].rawST CONTENT={{CAR}}<SP>parts
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[1].title CONTENT=Car<SP>parts<SP>for<SP>your<SP>{{CAR}}
TAG POS=1 TYPE=TEXTAREA FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[1].description CONTENT=Find<SP>affordable<SP>parts<SP>for<SP>your<SP>European<SP>sports<SP>car<SP>at<SP>Eurogenous.com.
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[1].url CONTENT={{URL}}
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[1].maxBid CONTENT={{BID}}
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[2].rawST CONTENT={{CAR}}<SP>engine<SP>parts
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[2].title CONTENT=Car<SP>parts<SP>for<SP>your<SP>{{CAR}}
TAG POS=1 TYPE=TEXTAREA FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[2].description CONTENT=Find<SP>affordable<SP>parts<SP>for<SP>your<SP>European<SP>sports<SP>car<SP>at<SP>Eurogenous.com.
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[2].url CONTENT={{URL}}
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[2].maxBid CONTENT={{BID}}
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[3].rawST CONTENT={{CAR}}<SP>restoration
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[3].title CONTENT=Car<SP>parts<SP>for<SP>your<SP>{{CAR}}
TAG POS=1 TYPE=TEXTAREA FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[3].description CONTENT=Find<SP>affordable<SP>parts<SP>for<SP>your<SP>European<SP>sports<SP>car<SP>at<SP>Eurogenous.com.
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[3].url CONTENT={{URL}}
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[3].maxBid CONTENT={{BID}}
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[4].rawST CONTENT={{CAR}}<SP>performance<SP>parts
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[4].title CONTENT=Car<SP>parts<SP>for<SP>your<SP>{{CAR}}
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[4].url CONTENT={{URL}}
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[4].maxBid CONTENT={{BID}}
TAG POS=1 TYPE=TEXTAREA FORM=NAME:listingForm ATTR=NAME:/go2/directraffic/handler/SLHandler.modifiedLBs[4].description CONTENT=Find<SP>affordable<SP>parts<SP>for<SP>your<SP>European<SP>sports<SP>car<SP>at<SP>Eurogenous.com.
TAG POS=1 TYPE=INPUT:SUBMIT FORM=NAME:listingForm ATTR=NAME:submit&&VALUE:Submit

3. Other important files:

3a. The schema.ini file

Simply click inside the window below, use your cursor to highlight the text and copy (type Control-c) it into a new file in your text editor (such as Note Pad) and save the file with an ".ini" extension.

The schema.ini file contains the file format of the "overture.csv" file that contains the test data.

3a. The Overture.csv file

Simply click inside the window below, use your cursor to highlight the data, and copy (type Control-c) it into a new file in your text editor (such as Note Pad) and save the file with an ".CSV" extension.

Purchase

Community

Subscribe To Newsletter:

The availability and performance of this website is monitored by iMacros Web Testing