I am having problems parsing an HTML tag. This entry repeats hundreds of times in this file, but withdifferent names and addresses, etc.
I need a routine that will search for for the first occuranceof a particular HTML tag (so that I can return the entire line with an input command and capture the name), return it to a variable, then continue to search for theremander of the names (it happens that “
” is useddirectly in front of every name in the file and nowhereelse), making sure to skip the ones that have already been returned.I’ve tried several things, but none have rendered the desired results.
The first thing you’ll need to do is to read the file character by character with the Input$ function. If you just use Input #n, it will leave out most of the punctuation. Here is a section from a program I wrote to parse my bookmark file:
Dim sTemp As String Dim sChar As String Open “filename.ext” For Input As #1 Do While Not EOF(1) sChar = Input$(1, 1) If Asc(sChar) = 13 Then ‘ Don’t include it in string ElseIf Asc(sChar) = 10 Then ‘ At this point, a full line has been read ‘ and should be processed with whatever method ‘ you choose. sTemp = “” Else sTemp = sTemp + sChar End If Loop Close #1As far as parsing the string, here is a sample loop of how to do it, assuming sTemp is your full line:
sSearch = “
“for i = 1 to len(sTemp) – len(sSearch) + 1 if mid$(sTemp, i, len(sSearch)) = sSearch then ‘ found string…do whatever exit for end ifnext i