Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Using VB6 to Track UPS packages

0 views
Skip to first unread message

JohnNews

unread,
Nov 8, 2003, 11:07:08 AM11/8/03
to
Folks:


As a VB6 newbie I am working on an application that goes to the UPS web site
to track packages

On the UPS web site I have to input 2 pieces of information: Tracking #,
Checkbox for agreement to terms & conditions.
So my VB6 forms has a text box for the UPS tracking # and a Combo Box for
Yes/No choice to the question of agreement to terms & conditions


* My code (see below) is not working perfectly. I cannot figure out what
the last line of code should be. What is Track.X and track.Y ?
* Is there a better way to access web information vsing VB6 ?
* Any links or references on this subject deeply appreciated ?


Here is the structure of the URL that results after submitting my two pieces
of information:

http://wwwapps.ups.com/WebTracking/processInputRequest?HTMLVersion=5.0&loc=en_US&Requester=UPSHome&tracknum=1Z+Y9R+990+AJ+4026+927+8&AgreeToTermsAndConditions=yes&track.x=34&track.y=7


Here is the code that I have for my UPS data retrieval program. It is not
working perfectly. So any assistance appreciated.

Dim strURL As String
strURL =
"http://wwwapps.ups.com/WebTracking/processInputRequest?HTMLVersion=5.0&loc=
en_US&Requester=UPSHome&tracknum="
strURL = strURL & Trim(textbox1.text)
strURL = strURL & "AgreeToTermsAndConditions=" & ComboBox1.text
strURL = strURL & ...


Patrick Shafer

unread,
Nov 10, 2003, 4:16:33 PM11/10/03
to
This doesn't directly answer your question, but I would recomend visiting:
http://www.ec.ups.com/ecommerce/solutions/c1.html

for information about UPS's e-commerce and application integration services.
I think you will find these to be much easer to use than trying to parse
results from a web site.


"JohnNews" <johnc...@comcast.net> wrote in message
news:OVuxjJhp...@TK2MSFTNGP09.phx.gbl...

MornThdr

unread,
Nov 15, 2003, 4:44:05 PM11/15/03
to
Dim strURL As String
strURL =
"http://wwwapps.ups.com/WebTracking/processInputRequest?HTMLVersion=5.0&loc=
en_US&Requester=UPSHome&tracknum="
strURL = strURL & Replace(Trim(textbox1.text), " ", "+") 'or at least i think that's the syntax to use

strURL = strURL & "AgreeToTermsAndConditions=" & ComboBox1.text
strURL = strURL & ...
0 new messages