VBA Code to paste cell values into web form

[frenchie]

I have a CSV file which contains employee data. There are 8 colums and 120 rows. I only need to copy the values from 4 of the columns (FirstName, LastName, EmployeeID and PhoneNumber) into a web form (text boxes) which holds 10 employees. How can I copy 10 rows of data to the web form and submit it and then do the next 10, etc using VBA.

 

[lstros1]

Sorry code partial is: Please let me know if you need anything else.

· <FORM METHOD=POST ACTION="processPaths.html"><?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o></o>
· <INPUT TYPE=HIDDEN NAME="action" VALUE="update"><o></o>
· <INPUT TYPE=HIDDEN NAME="processPathName" VALUE="PPMultiABMedium"><o></o>
· <FONT SIZE=2><B>PPMultiABMedium (DefaultPicking, pkREBINLEV1)</B></FONT><P><o></o>
· <TABLE BORDER=1 CELLSPACING=0 CELLPADDING=1><o></o>
· <TR><o></o>
· <TD><FONT SIZE=1 ALIGN=LEFT VALIGN=TOP><B>Status</B></FONT></TD><o></o>
· <TD><FONT SIZE=1 ALIGN=LEFT VALIGN=TOP><B>Demand Window</B></FONT></TD><o></o>
· <TD><FONT SIZE=1 ALIGN=LEFT VALIGN=TOP><B>Pick Rate Ave</B></FONT></TD><o></o>
· <TD><FONT SIZE=1 ALIGN=LEFT VALIGN=TOP><B>Process Pad</B></FONT></TD><o></o>
· <TD><FONT SIZE=1 ALIGN=LEFT VALIGN=TOP><B>Tote Limit</B></FONT></TD><o></o>
· <TD><FONT SIZE=1 ALIGN=LEFT VALIGN=TOP><B>Shipment Limit</B></FONT></TD><o></o>
· <TD><FONT SIZE=1 ALIGN=LEFT VALIGN=TOP><B>Batch Limit</B></FONT></TD><o></o>
· <TD><FONT SIZE=1 ALIGN=LEFT VALIGN=TOP><B>Target Unit Rate</B></FONT></TD><o></o>
· <TD><FONT SIZE=1 ALIGN=LEFT VALIGN=TOP><B>Min Premium Percent</B></FONT></TD><o></o>
· <TD><FONT SIZE=1 ALIGN=LEFT VALIGN=TOP><B>Min Priority</B></FONT></TD><o></o>
· </TR><o></o>
· <TR><o></o>
· <TD><o></o>
· <SELECT NAME="status"><o></o>
· <OPTION VALUE="Active" SELECTED>Active</OPTION><o></o>
· <OPTION VALUE="Paused" >Paused</OPTION><o></o>
· <OPTION VALUE="Halt"> Halt </OPTION><o></o>
· </SELECT><o></o>
· </TD><o></o>
· <TD><INPUT TYPE=TEXT SIZE=8 NAME="demandCompletionWindow" <o></o>
· VALUE=00:00:00></TD><o></o>
· <TD><INPUT TYPE=TEXT SIZE=4 NAME="pickRateAverage" VALUE=120></TD><o></o>
· <TD><INPUT TYPE=TEXT SIZE=8 NAME="processingPad" VALUE=04:00:00></TD><o></o>
· <TD><INPUT TYPE=TEXT SIZE=4 NAME="containerQuantityLimit" <o></o>
· VALUE=0></TD><o></o>
· <TD><INPUT TYPE=TEXT SIZE=6 NAME="openDemandQuantityLimit" <o></o>
· DISABLED='true'<o></o>
· VALUE=0></TD><o></o>
· <TD><INPUT TYPE=TEXT SIZE=6 NAME="openBatchQuantityLimit" <o></o>
· VALUE=6></TD><o></o>
· <TD><INPUT TYPE=TEXT SIZE=6 NAME="unitRateTarget" VALUE=1200></TD><o></o>
· <TD><INPUT TYPE=TEXT SIZE=8 NAME="minPremiumPercent" <o></o>
· DISABLED='true'<o></o>
· VALUE=-1></TD><o></o>
· <TD><o></o>
· <select name = "minPriority"><o></o>
· <option VALUE=0 SELECTED>0 - Min Priority</option><o></o>
· <option VALUE=1 >1 - Super Savers</option><o></o>
· <option VALUE=4 >4 - Normal/Std</option><o></o>
· <option VALUE=10 >10 - Premium</option><o></o>
· <option VALUE=15 >15 - Fast Track</option><o></o>
· <option VALUE=16 >16 - Same/Next</option><o></o>
· </select><o></o>
· </TD><o></o>
· </TR><o></o>
· </TABLE><o></o>
<o> </o>
· <INPUT TYPE=SUBMIT VALUE="Submit Changes"><o></o>

 

[lstros1]

Please disregards