VBA String Manipulation

krieg313 · May 5, 2011

Hello,
I need help extracting certain parts of a String that I pulled Using ie.Doc.Body.InnerText, the problem is that the text i need is all in one line, I need a way to tell the Code to stop when it sees a certain character or string. I've tried messing around with instr() but no luck.

Here is the output from Innertext:

Show Filters
Job ID:

BÖWE One Job Information Sheet

*JLI-2156379*Thursday, May 05, 2011
11:00 PM
Job NumberDue Date

Order ID:LI-539625Order Name:Beneficial Interim
Customer ID:BR Customer Name:Broadridge
Create User:Create Date:Saturday, April 30, 2011 5:19 AM

Job Name:ROYCE FUNDS
Reference #:M89818-010
Product ID:BEN. INT Product Name:BENEFICIAL INTERIM
Job Type:INTERIMJV Template:11 - INKJET
Job Quantity:1704

Special Instructions:

Order Quanity 0000002134Mail Method USPS STANDARD MAILSub-Level 010
Env Code 6Save All Surplus YFold Material N
Fund Name ROYCE VALUE PLUS FUND-CONSULTANT CL
Comments A
Comments B
Comments C
Comments D
Drop Date
# of Enclosures01Schwab N
Enclosure TypeCode/DescriptionUnique ID
1SUMMARYRVP-CRK-0511552308
2
3
4
5
6
7
8
9
10
CUSIPMC0053Media TypeINKJETService TypeIC
Weight00000.700Meeting Date1900-01-01Special PrintN
Thickness00000.036Strat. Amount000020000Package Max001
Work CenterVPrint Date2011-04-30Print Name5 AM

*M89818-010*

For example:
from line
Order Quanity 0000002134Mail Method USPS STANDARD MAILSub-Level 010

I want only whatever is after Mail Mehod, In this case USPS Standard Mail, (also Mail Method is not a constant).

if the HTML Source code is needed i can post it.

Qik3Coder · May 5, 2011

You haven't defined what the separator character is. If you say a space, given that example, I will laugh.

There is little structure to that sample.
If you can guarantee that the text "Mail Method" will always be present, you can key off of that.
If you can guarantee that the mail methodwill always be in the same position you can pull from there as well.

If this is actually in a web page, and the parts are in a table structure, you may be better "walking" the table nodes and pulling the text that way.

Lodlaiden.

If [blue]you have problems[/blue], I want [green]source code[/green] AND [green]error messages[/green], none of this [red]"there was an error crap"[/red]

krieg313 · May 5, 2011

Mail Method is always present, also i didn't want to take the Innertext approach as it is sloppy, but i couldn't figure out a way to parse off the tables from the source below.

This is the raw HTML source:

<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8">

<script>
function ChangeSite() {
//Set the currentSite property of the drop-down to the currentSite that is selected.
var currentSite = document.activeElement.options[document.activeElement.selectedIndex].value;
var coll=document.getElementsByTagName("SELECT");
var obj;
var optObj
if (coll!=null)
{
for (i=0; i<coll.length; i++)
if (coll.site=="True") {
//Erase all options from this SELECT object, and add from Site_ object.
var optLen = coll.options.length;
for(j=0; j<optLen-1; j++)
coll.options.remove(1);
obj = document.getElementsByName("Site_"+ coll.name);
for(j=0; j<obj[0].options.length; j++) {
if (currentSite==obj[0].options[j].site || currentSite==""
|| obj[0].options[j].site=="") {
optObj = document.createElement("OPTION");
coll.options.add(optObj);
optObj.innerText = obj[0].options[j].innerText;
}
}
}
}
}
</script>

<HTML>
<HEAD>
<LINK REL=STYLESHEET TYPE="text/css" HREF=StyleSheets/Dockets.css>
<SCRIPT language="JavaScript" src="Scripts/Report.js"></SCRIPT>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<SCRIPT language="JavaScript" src="../ASP/Scripts/Report.js"></SCRIPT>
<SCRIPT language="JavaScript" src="../ASP/Scripts/Filters.js"></SCRIPT>
<SCRIPT language="JavaScript" src="../ASP/Scripts/Date.js"></SCRIPT>
<SCRIPT language="JavaScript" src="../ASP/Scripts/DatePicker.js"></SCRIPT>
<LINK REL=STYLESHEET TYPE="text/css" HREF=../ASP/StyleSheets/Filters.css>
<LINK REL=STYLESHEET TYPE="text/css" HREF=../ASP/StyleSheets/DatePicker.css>

</HEAD>
<BODY>
<TABLE width=100% MEDIA=print>

<TR>
<TD align=center>

<DIV class=ShowButDoNotPrint><TABLE width=100% height=100%><TR><TD>
<DIV id=divHideShow onClick="ToggleFiltersDiv('Show Filters', 'Hide Filters');" style="cursor: hand; text-decoration: underline; color: #2020E0; font-size: 8pt; font-family: Tahoma">
Show Filters
</DIV>
</TD></TR><TR><TD align=center valign=middle>
<FORM name=frmFilters id=frmFilters method=post action="TrackingSheet%2Easp">
<DIV id=divFilters class=classFilterGrid style="display: none;">
<TABLE></DIV>
<TR>
<TD>
<DIV class=classFilter>
Job ID:
</DIV>
</TD>
<TD>
<INPUT type=text name="JobID" value="LI-2156379">
</TD>
</TR>
<TR>
<TD colspan=2>
<INPUT type=hidden name="Type" value="Job">
</TD>
</TR>
<TR><TD></TD><TD valign=bottom>
<INPUT type=submit value="View Report">
</TD></TR></TABLE>
</DIV>
</FORM>
</TD></TR></TABLE>

</TD>
</TR>
</TABLE>


<TABLE cellspacing=0 cellpadding=2 style="width: 99%; table-layout: fixed;">
<tr>
<td>
<TABLE cellspacing=0 cellpadding=2 width=100% ID="Table6">
<TR>
<TD class=ReportTitle colspan=8 align=center>BÖWE One Job Information Sheet</TD>
</TR>
<TR>
<TD colspan=8> </TD>
</TR>

<TR>
<TD rowspan=2 class=Barcode colspan=4 nowrap >*JLI-2156379*</TD>
<TD align=center colspan=4><font face="Times New Roman" size="pt">Thursday, May 05, 2011</font></TD>
</TR>
<TR>
<TD align=center colspan=4><font face="Times New Roman" size="pt">11:00 PM</font></TD>
</TR>

<TR>
<TD align=center class=OrderNumberHeader colspan=2>Job Number</TD>



<TD class=Optus align=right colspan=2><B></B></TD>

<TD class=DueDateHeader align=center colspan=4><font size="pt">Due Date</font></TD><TD></TD>
</TR>

</TABLE>
</td>
</tr>
<tr>
<td>
<TABLE cellspacing=0 cellpadding=2 width=100% ID="Table2">
<TR>

<TD class=OrderHeader align=right>Order ID:</TD>
<TD class=OrderHeaderDetails>LI-539625</TD>
<TD class=OrderHeader align=right>Order Name:</TD>
<TD class=OrderHeaderDetails colspan=3 >Beneficial Interim</TD>

</TR>
<TR>
<TD class=OrderHeader align=right>Customer ID:</TD>
<TD class=OrderHeaderDetails>BR </TD>
<TD class=OrderHeader align=right nowrap>Customer Name:</TD>
<TD class=OrderHeaderDetails colspan=3>Broadridge</TD>
</TR>
<TR>
<TD class=OrderHeader valign=top align=right>Create User:</TD>
<TD class=OrderHeaderDetails></TD>
<TD class=OrderHeader valign=top align=right>Create Date:</TD>
<TD class=OrderHeaderDetails valign=top nowrap>Saturday, April 30, 2011 5:19 AM</TD>

</TR>

<TR>
<TD class=BorderLineThin COLSPAN=6> </TD>
</TR>
</table>
</td>
</tr>
<tr>
<td>
<TABLE cellspacing=0 cellpadding=2 width=100% ID="Table3" align=left border=0 >
<TR>
<TD class=OrderHeader align=right width=15%>Job Name:</TD>
<TD class=OrderHeaderDetails width=85% colspan=3 >ROYCE FUNDS</TD>
</TR>
<TR>
<TD class=OrderHeader align=right >Reference #:</TD>
<TD class=OrderHeaderDetails colspan=3 >M89818-010</TD>
</TR>

<TR>
<TD class=OrderHeader align=right>Product ID:</TD>
<TD class=OrderHeaderDetails>BEN. INT </TD>
<TD class=OrderHeader align=right >Product Name:</TD>
<TD class=OrderHeaderDetails >BENEFICIAL INTERIM</TD>
</TR>

<TR>
<TD class=OrderHeader align=right >Job Type:</TD>
<TD class=OrderHeaderDetails >INTERIM</TD>
<TD class=OrderHeader align=right >JV Template:</TD>
<TD class=OrderHeaderDetails>
11 - INKJET </TD>
</TR>
<TR>
<TD class=OrderHeader align=right >Job Quantity:</TD>
<TD class=OrderHeaderDetails >1704</TD>
</TR>
</TR>
</TABLE>
</TD>
</TR>
<TR>
<TD class=BorderLineThin> </TD>
</TR>

<tr>
<td>
<TABLE cellspacing=0 cellpadding=2 width=100% ID="Table4">
<TR>
<TD class=FieldTitle><U>Special Instructions:</U></TD>
</TR>

<TR>
</TR>


<TR>
<TD class=Notes colspan=6 style="text-layout: justify; word-wrap:break-word"><P>
<TABLE style="WIDTH: 536pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=715 border=0 x:str>
<TBODY>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696 1.5pt solid; WIDTH: 74pt; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" width=99 height=19><STRONG><FONT face=Arial size=2>Order Quanity</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 95pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=127><FONT size=2><FONT face=Arial><SPAN style="mso-spacerun: yes"> </SPAN>0000002134</FONT></FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 89pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=118><STRONG><FONT face=Arial size=2>Mail Method</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 107pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=143><FONT size=2><FONT face=Arial><SPAN style="mso-spacerun: yes"> </SPAN>USPS STANDARD MAIL</FONT></FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 69pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=92><STRONG><FONT face=Arial size=2>Sub-Level</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 102pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=136><FONT size=2><FONT face=Arial><SPAN style="mso-spacerun: yes"> </SPAN>010</FONT></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl26 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: windowtext 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19><STRONG><FONT face=Arial size=2>Env Code</FONT></STRONG></TD>
<TD class=xl27 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: windowtext 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT size=2><FONT face=Arial><SPAN style="mso-spacerun: yes"> </SPAN>6</FONT></FONT></TD>
<TD class=xl26 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: windowtext 1.5pt solid; BACKGROUND-COLOR: transparent"><STRONG><FONT face=Arial size=2>Save All Surplus</FONT></STRONG></TD>
<TD class=xl27 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: windowtext 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT size=2><FONT face=Arial><SPAN style="mso-spacerun: yes"> </SPAN>Y</FONT></FONT></TD>
<TD class=xl26 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: windowtext 1.5pt solid; BACKGROUND-COLOR: transparent"><STRONG><FONT face=Arial size=2>Fold Material</FONT></STRONG></TD>
<TD class=xl27 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: windowtext 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT size=2><FONT face=Arial><SPAN style="mso-spacerun: yes"> </SPAN>N</FONT></FONT></TD></TR></TBODY></TABLE>
<TABLE style="WIDTH: 554pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=738 border=0 x:str>
<TBODY>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl26 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: windowtext 1.5pt solid; BORDER-LEFT: #969696 1.5pt solid; WIDTH: 93pt; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" width=124 height=19><STRONG><FONT face=Arial size=2>Fund Name</FONT></STRONG></TD>
<TD class=xl27 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: windowtext 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 461pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=614><FONT face=Arial size=2> ROYCE VALUE PLUS FUND-CONSULTANT CL</FONT></TD></TR></TBODY></TABLE>
<TABLE style="WIDTH: 554pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=738 border=0 x:str>
<COLGROUP>
<COL style="WIDTH: 93pt; mso-width-source: userset; mso-width-alt: 4534" width=124>
<COL style="WIDTH: 461pt; mso-width-source: userset; mso-width-alt: 22454" width=614>
<TBODY>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl26 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: windowtext 1.5pt solid; BORDER-LEFT: #969696 1.5pt solid; WIDTH: 93pt; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" width=124 height=19><STRONG><FONT face=Arial size=2>Comments A</FONT></STRONG></TD>
<TD class=xl27 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: windowtext 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 461pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=614><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19><STRONG><FONT face=Arial size=2>Comments B</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19><STRONG><FONT face=Arial size=2>Comments C</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19><STRONG><FONT face=Arial size=2>Comments D</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR></TBODY></TABLE>
<TABLE style="WIDTH: 554pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=738 border=0 x:str>
<TBODY>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl26 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: windowtext 1.5pt solid; BORDER-LEFT: #969696 1.5pt solid; WIDTH: 93pt; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" width=124 height=19><STRONG><FONT face=Arial size=2>
<P align=left><STRONG><FONT size=2>Drop Date  </FONT></STRONG></P></FONT></STRONG></TD>
<TD class=xl27 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: windowtext 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 461pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=614><FONT style="BACKGROUND-COLOR: #000000" face=Arial color=#ffffff size=2><STRONG></STRONG></FONT></TD></TR></TBODY></TABLE>
<TABLE style="WIDTH: 564pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=753 border=0 x:str>
<COLGROUP>
<COL style="WIDTH: 14pt; mso-width-source: userset; mso-width-alt: 694" width=19>
<COL style="WIDTH: 130pt; mso-width-source: userset; mso-width-alt: 6326" width=173>
<COL style="WIDTH: 140pt; mso-width-source: userset; mso-width-alt: 6838" span=3 width=187>
<TBODY>
<TR style="HEIGHT: 14.25pt; mso-height-source: userset" height=19>
<TD class=xl26 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696 1.5pt solid; WIDTH: 144pt; BORDER-BOTTOM: windowtext 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: white" width=192 colSpan=2 height=19><STRONG><FONT size=2># of Enclosures</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 140pt; BORDER-BOTTOM: windowtext 1.5pt solid; BACKGROUND-COLOR: white" width=187><FONT size=2>01</FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 140pt; BORDER-BOTTOM: windowtext 1.5pt solid; BACKGROUND-COLOR: white" width=187>
<P align=right><STRONG><FONT size=2>Schwab  </FONT></STRONG></P></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 140pt; BORDER-BOTTOM: windowtext 1.5pt solid; BACKGROUND-COLOR: white" width=187> <FONT size=2>N</FONT></TD></TR></TBODY></TABLE>
<TABLE style="WIDTH: 560pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=748 border=0 x:str>
<COLGROUP>
<COL style="WIDTH: 14pt; mso-width-source: userset; mso-width-alt: 694" width=19>
<COL style="WIDTH: 182pt; mso-width-source: userset; mso-width-alt: 8886" span=3 width=243>
<TBODY>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl27 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: windowtext 1.5pt solid; BORDER-LEFT: #969696 1.5pt solid; WIDTH: 14pt; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" width=19 height=19><FONT face=Arial size=2> </FONT></TD>
<TD class=xl28 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: windowtext 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 182pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=243><FONT face=Arial size=2><STRONG>Enclosure Type</STRONG></FONT></TD>
<TD class=xl26 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: windowtext 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 182pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=243><FONT face=Arial size=2><STRONG>Code/Description</STRONG></FONT></TD>
<TD class=xl26 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: windowtext 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 182pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=243><FONT face=Arial size=2><STRONG>Unique ID</STRONG></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19 x:num><STRONG><FONT face=Arial size=2>1</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>SUMMARY</FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>RVP-CRK-0511</FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>552308</FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19 x:num><STRONG><FONT face=Arial size=2>2</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19 x:num><STRONG><FONT face=Arial size=2>3</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19 x:num><STRONG><FONT face=Arial size=2>4</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19 x:num><STRONG><FONT face=Arial size=2>5</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19 x:num><STRONG><FONT face=Arial size=2>6</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19 x:num><STRONG><FONT face=Arial size=2>7</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19 x:num><STRONG><FONT face=Arial size=2>8</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19 x:num><STRONG><FONT face=Arial size=2>9</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19 x:num><STRONG><FONT face=Arial size=2>10</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2></FONT></TD></TR></TBODY></TABLE>
<TABLE style="WIDTH: 521pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=695 border=0 x:str>
<COLGROUP>
<COL style="WIDTH: 77pt; mso-width-source: userset; mso-width-alt: 3766" width=103>
<COL style="WIDTH: 93pt; mso-width-source: userset; mso-width-alt: 4534" width=124>
<COL style="WIDTH: 77pt; mso-width-source: userset; mso-width-alt: 3766" width=103>
<COL style="WIDTH: 93pt; mso-width-source: userset; mso-width-alt: 4534" width=124>
<COL style="WIDTH: 77pt; mso-width-source: userset; mso-width-alt: 3766" width=103>
<COL style="WIDTH: 104pt; mso-width-source: userset; mso-width-alt: 5046" width=138>
<TBODY>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696 1.5pt solid; WIDTH: 77pt; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" width=103 height=19><STRONG><FONT face=Arial size=2>CUSIP</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 93pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=124><FONT face=Arial size=2>MC0053</FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 77pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=103><STRONG><FONT face=Arial size=2>Media Type</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 93pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=124><FONT face=Arial size=2>INKJET</FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 77pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=103><STRONG><FONT face=Arial size=2>Service Type</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696 1.5pt solid; BORDER-LEFT: #969696; WIDTH: 104pt; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent" width=138><FONT face=Arial size=2>IC</FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19><STRONG><FONT face=Arial size=2>Weight</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>00000.700</FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><STRONG><FONT face=Arial size=2>Meeting Date</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>1900-01-01</FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><STRONG><FONT face=Arial size=2>Special Print</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>N</FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19><STRONG><FONT face=Arial size=2>Thickness</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>00000.036</FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><STRONG><FONT face=Arial size=2>Strat. Amount</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>000020000</FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><STRONG><FONT face=Arial size=2>Package Max</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>001</FONT></TD></TR>
<TR style="HEIGHT: 14.25pt" height=19>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696 1.5pt solid; BORDER-BOTTOM: #969696 1.5pt solid; HEIGHT: 14.25pt; BACKGROUND-COLOR: transparent" height=19><STRONG><FONT face=Arial size=2>Work Center</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>V</FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><STRONG><FONT face=Arial size=2>Print Date</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>2011-04-30</FONT></TD>
<TD class=xl25 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><STRONG><FONT face=Arial size=2>Print Name</FONT></STRONG></TD>
<TD class=xl24 style="BORDER-RIGHT: #969696 1.5pt solid; BORDER-TOP: #969696; BORDER-LEFT: #969696; BORDER-BOTTOM: #969696 1.5pt solid; BACKGROUND-COLOR: transparent"><FONT face=Arial size=2>5 AM</FONT></TD></TR></TBODY></TABLE></P></TD>
</TR>


<TR>
<TD class=BorderLineThick COLSPAN=6> </TD>
</TR>
</table>
</td>
</tr>
<tr>
<td>
<TABLE cellspacing=0 cellpadding=2 width=100% ID="Table5">



<TR>
<tr>
<td colspan=5></td>
<TD valign=top class=JobBarcode colspan=3 nowrap align=right>*M89818-010*</TD>
</tr>

</table>
</td>
</tr>
</TABLE>




</BODY>
</HTML>

Qik3Coder · May 5, 2011

Use the inner text.
Use this much for your testing:

Special Instructions:Order Quanity 0000002134Mail Method USPS STANDARD MAILSub-Level 010Env Code 6Save All Surplus YFold Material NFund Name

Scrape out the Mail Method portion.
Use the column headers as reference points when parsing it out.
Get something together and post when you get stuck or are done.

Lodlaiden

If [blue]you have problems[/blue], I want [green]source code[/green] AND [green]error messages[/green], none of this [red]"there was an error crap"[/red]

krieg313 · May 5, 2011

So far i've come up with

Private Sub Command0_Click()
Dim Linum As String

Linum = "LI-2156379"

Call Kick_Off_Log_In

Set IeFetch = CreateObject("InternetExplorer.Application")
IeFetch.navigate "

http://10.0.239.234/one/ASP/TrackingSheet.asp?JobID="

& Linum & "&Type=Job"
While IeFetch.Busy
DoEvents
Wend
IeFetch.Visible = 0

MainTable = IeFetch.Document.body.innerText
TextBox = MainTable
'sublvl = InStrRev(MainTable, "Sub-Level")

MailMethod = Mid(Maintable, InStr(1, Maintable, "Mail Method ") + 12)
'Look Below for comments'**********************

'mailmethod2 = InStr(Maintable, "Mail Method ")
'MailMethod = Left(mailmethod2, 4)

'MailMethod = Right(MainTable, InStr(MainTable, "Method "))

End Sub

*********
This line gets me:

USPS STANDARD MAILSub-Level 010
Env Code 6Save All Surplus YFold Material N
Fund Name ROYCE VALUE PLUS FUND-CONSULTANT CL
Comments A
Comments B
Comments C
Comments D
Drop Date
# of Enclosures01Schwab N
Enclosure TypeCode/DescriptionUnique ID
1SUMMARYRVP-CRK-0511552308
2
3
4
5
6
7
8
9
10
CUSIPMC0053Media TypeINKJETService TypeIC
Weight00000.700Meeting Date1900-01-01Special PrintN
Thickness00000.036Strat. Amount000020000Package Max001
Work CenterVPrint Date2011-04-30Print Name5 AM

*M89818-010*

Problem now is how do i take off Sub-Level..... each time I run the code.

Qik3Coder · May 5, 2011

If Sublevel is constant header, then you need to do an additional Left() based on the InStr of the "Sub-Level" text.

Put this after
you may have to +/-1 to this:

Code:

MailMethod = Mid(Maintable, InStr(1, Maintable, "Mail Method ") + 12)

MailMethod = Left(MailMethod, InStr(MailMethod, "Sub-Level"))

Lodlaiden

If [blue]you have problems[/blue], I want [green]source code[/green] AND [green]error messages[/green], none of this [red]"there was an error crap"[/red]

strongm · May 5, 2011

Here's one way:

MailMethod = Split(Split(myDoc.body.innerText, "Mail Method ")(1), "Sub-Level")(0)

Qik3Coder · May 5, 2011

@strongm,
That's good. Didn't think you could pass strings into split.
Nice.

If [blue]you have problems[/blue], I want [green]source code[/green] AND [green]error messages[/green], none of this [red]"there was an error crap"[/red]

krieg313 · May 5, 2011

I'll give it a try and post my results.

krieg313 · May 5, 2011

It Works!
But can you explain how it works?
I'd like to do the same for Workcenter B too.

Qik3Coder · May 5, 2011

Code:

MailMethod = [COLOR=blue]Split([COLOR=green]Split(myDoc.body.innerText, "Mail Method ")[/color][COLOR=red](1)[/color], "Sub-Level")[COLOR=red](0)[/color][/color]

(Split(myDoc.body.innerText, "Mail Method ")
Split is a function that returns a whole string SPLIT into smaller strings. Normally you use a comma or semi-color as a separator. In this case, it's using the "Mail Method" as the word to split on.

(1)
The strings that are returned from the split function are returned in a ZERO base ARRAY. Using a (1) indicates that we want the 1st string AFTER the 1st occurrence of the text "Mail Method".

Split([X], "Sub-Level")(0)

Because the first (inner) split is wrapped with another, it will use the results of the first SPLIT as the INPUT for the next SPLIT function. Now we say the divider is "Sub-Level", and that we want the string BEFORE the divider.

HTH,
Lodlaiden

If [blue]you have problems[/blue], I want [green]source code[/green] AND [green]error messages[/green], none of this [red]"there was an error crap"[/red]

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

VBA String Manipulation

krieg313

Technical User

Qik3Coder

Programmer

krieg313

Technical User

Qik3Coder

Programmer

krieg313

Technical User

Qik3Coder

Programmer

strongm

MIS

Qik3Coder

Programmer

krieg313

Technical User

krieg313

Technical User

Qik3Coder

Programmer

Similar threads

Part and Inventory Search

Sponsor