Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 271
  • Last Modified:

Parsing...?

someone wanna give me a brief explination of what parsing is?  how to do it? a simple code, maybe.  What i need to do it.. just the basics

thanks
0
learning_t0_pr0gram
Asked:
learning_t0_pr0gram
  • 2
  • 2
1 Solution
 
EDDYKTCommented:
Parsing what?

Parsing string?
0
 
mccainz2Commented:
example

"I love milk"

now programatically find word "love" within the string

    Dim sParseMe, sLove As String
    Dim iLoveStart As Integer
    Dim iLoveEnd As Integer
   
    sParseMe = "I love Milk"
    iLoveStart = InStr(1, sParseMe, "love")
    iLoveEnd = InStr(iLoveStart, sParseMe, " ")
    sLove = Mid(sParseMe, iLoveStart, iLoveEnd - iLoveStart)
   
    MsgBox sLove
0
 
learning_t0_pr0gramAuthor Commented:
yes, but what if you wanted to get a word, but u didn't know what it was...

example: text from a website... like a profile or something
0
 
mccainz2Commented:
well , you'd need to define something to parse on ... in your website example it may be an html or meta-tag....
You have to have some clue as to what you are looking for. For advanced parsing use the regular expression object , its basically the big cannon of this subject ....

RegExp
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/jscript7/html/jsjsgrpregexpsyntax.asp

And a question I answered (with complete source code) on parsing lottery numbers from a website

http://experts-exchange.com/Programming/Programming_Languages/Visual_Basic/VB_Controls/Q_20430088.html
0
 
learning_t0_pr0gramAuthor Commented:
ok... i kinda understand a little now... what i'm trying to make is you type a Yahoo! ID and the password to it, and it tells u all the profiles on the account...

heres an example:

http://login.yahoo.com/config?login=elves_look_like_some_green_shit&passwd=123456&.done=http://edit.profiles.yahoo.com/config/edit_identity?.src=ga&.done=http://games.yahoo.com/&.redir_from=REGISTRATION

if you click that link, it will log you into a yahoo id and you can see that it has profiles

i want it to add the profiles to a list box


like:

Default ID: (default id)
Profile 1: (profile 1)
Profile 2: (profile 2)


ect.. but when i try, it adds the first 2 ids, and then starts adding a bunch of nonsense
here is what i have, if u can tell me whats wrong with it:

Dim page, theDefID As String
Dim defStart As Integer
Dim defEnd As Integer
Dim sHowFar As Integer
Private Sub Command1_Click()
If id.Text = "" Then Exit Sub
If pw.Text = "" Then Exit Sub
page = Inet1.OpenURL("http://login.europe.yahoo.com/config?login=" & id.Text & "&passwd=" & pw.Text & "&.done=http://edit.profiles.yahoo.com/config/edit_identity?.src=ga&.done=http://games.yahoo.com/&.redir_from=REGISTRATION")
Do
On Error GoTo blah
defStart = InStr(sHowFar + 1, page, "[<a href=""http://profiles.yahoo.com/") + Len("[<a href=""http://profiles.yahoo.com/")
defEnd = InStr(defStart, page, """>Edit</a>]")
theDefID = Mid(page, defStart, defEnd - defStart)
found.AddItem theDefID
sHowFar = sHowFar + defEnd
Loop
blah:
sHowFar = 0
Exit Sub
End Sub

0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

  • 2
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now