import data from the web

[thegame8311]

Greetings all

Is there a way to import data from the web straight to foxpro or is it easier to go through excel to foxpro

 

[Mike Lewis]

Another possibility is to use GETWORDNUM() and GETWORDCOUNT().

Mike


__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips, training, consultancy

 

[JRB-Bldr]

now for my issue with AT()

Have you looked in your VFP Help for information on how to use the AT() function?

If you had done so you would have seen that the sample code you listed above is wrong.

AT(<what to search for>,<where to look for it>,<which occurance to find>)

The same question applies - Have you looked in your VFP Help for information on how to use the SUBSTR() function?

SUBSTR(<which expression>, <where to START>, <how many characters>)

So, guessing from the SUBSTR() part of your code, you should be issuing a ALLTRIM(SUBSTR(z,AT(',',z)+1))

If you have questions about VFP Commands/Functions first look at your VFP Help for answers.
That does not, in any way, mean that we aren't happy to help, but that you can get most of these type of answers yourself with a little work on your own.

Good Luck,
JRB-Bldr

 

[Olaf Doschke]

this is my list:
Doe, John
Smith, Joan

what is returned is:
Doe
Doe

Then you're always working on the same z="Doe, Joan". Show the loop and we can help you to get a different z for each line of the list.

Bye, Olaf.

 

[thegame8311]

Here is my for loop

FOR lnI = 1 to lnCount3
  laHyper3(lnI) = ALINES(laHyper3,z,",")
  lp1.text3.value = laHyper(lnI)
  newline3 = laHyper3(lnI)
  FWRITE (lnFileHandle3, newline3)
  FWRITE (lnFileHandle3, Chr(13))
  FWRITE (lnFileHandle3, Chr(10))
ENDFOR

and for some reason laHyper(1) returns 76

instead of Doe

 

[Mike Lewis]

This is where you are going wrong:

 laHyper3(lnI) = ALINES(laHyper3,z,",")

ALINES returns a count of the number of lines that it finds. The actual line gets stored in the array (laHyper() in your example).

I suggest you read the help on all these functions. In the case of ALINES(), you might also find this article useful:
Parsing comma-delimited strings into a Visual Foxpro array.

Mike

__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips, training, consultancy

 

[TamarGranor]

Another possibility is to use GETWORDNUM() and GETWORDCOUNT().

Just want to point out that ALINES()' speed is linear with string length. These functions are definitely not, and as strings get long, they get really slow.

Tamar

 

[Mike Lewis]

Good point, Tamar. But they might still be worth keeping in mind if the strings are short.

Mike

__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips, training, consultancy

 

[Olaf Doschke]

To make Mikes answer a bit more to the point:
ALINES creates the whole array laHyper3, not just one array element.
So you would do one ALINE() call BEFORE the loop on the resulting array.

* lnFileHandle3 = FOpen(...)
* z sample value
z = "Huey,Dewey,Louie"
* split z at commas, create an array laHyper3
lnCountOfArrayElements = ALINES(laHyper3,z,",")
* loop through the split parts of z
FOR lnI = 1 to lnCountOfArrayElements 
  lp1.text3.value = laHyper(lnI)
  newline3 = laHyper3(lnI)
  FWRITE (lnFileHandle3, newline3+Chr(13)+Chr(10))
ENDFOR
* FClose(lnFileHandle3)

What you didn't show is the loop changing z. My loop as the correction of the loop you showed is just processing a single z, not a list of z values.

In thjis sampele this will result in two lines "Jane" and "Doe". I don't think that is what you want. You need a loop changing z, going through the list of names you have there.

Bye, Olaf.

 

[thegame8311]

so in the case above by olaf:

laHyper3(1)= Doe
laHyper3(2) = Jane

or am i misreading it?

 

[Mike Lewis]

so in the case above by olaf:
laHyper3(1)= Doe
laHyper3(2) = Jane

No. In Olaf's example, the original string contains "Huey,Dewey,Louie", so laHyper3(1) will contain "Huey"; laHyper3(2) will contain "Dewey".

You know, you can always play around with these functions in the Command Window. That's probably the best way to figure out how they work.

Mike

__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips, training, consultancy

 

[thegame8311]

Yes I have been playing with the functions in the command window.

Thank you everybody for your help, with all your ideas I have gotten the right combination of functions to do what I was wanting, you guys are awesome

 

[Mike Lewis]

Glad to hear you've got it working. Be sure to come back if you have any new problems.

Mike


__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips, training, consultancy

 

[Olaf Doschke]

Sorry, the text of my last posting was misleading, as I changed the code to split "Huey,Dewey,Louie" and still talked about it creating two lines "Jane" and "Doe".

But you go it, good.

Bye, Olaf.