Here is a non-RegEx solution (assuming the text between the
"http://www.amazon.com"
part and the product number part is always
"/exec/ASIN/")....
Dim oldURL As String
Dim newURL As String
Dim Parts() As String
oldURL = "http://www.amazon.com/exec/obidos/ASIN/B0013EF17O/ref=br_n..."
Parts = Split(Replace(oldURL, "http://",
""), "/")
ReDim Parts(4)
newURL = "http://"
+ Join(Parts, "/") + "/**myaffiliatecodehere**/"
Rick
"Allan Drake" <supercool@[EMAIL PROTECTED]
> wrote in message
news:24e71f53-a62e-45f5-92bc-7787c0b837a1@[EMAIL PROTECTED]
May 9, 12:46 am, John <jmrukk...@[EMAIL PROTECTED]
> wrote:
> Allan Drake wrote:
> > I am modifying URLs for amazon products in a string along with other
> > html data in a real basic script. I can't find the right way to do it.
>
> > An Example URL:
>
>http://www.amazon.com/exec/obidos/ASIN/B0013EF17O/ref=br_nf_0_4?pf_rd...
>
> > After "/ASIN/B0013EF17O/" I want to insert my standard amazon
> > affiliate code so it would be like....
>
> > /ASIN/B0013EF170/**myaffiliatecodehere***/ <---> chop off the rest
> > of the URL
>
> > So I am basically, searching, inserting my code in the right spot, and
> > then chopping off part of the URL. I need to do this for every link in
> > my string.
>
> How about using a regular expression with a search pattern of
> (http://www.amazon.com/exec/obidos/ASIN/.+?/)
and an output pattern of
> $1***myaffiliatecodehere***/
>
> That should do the trick.
>
> Good luck -- John
Thanks for the regex syntax. Do you have a full example? I havent used
Regex before, cant find much. I'm a little bit farther, but not all
the way.
|
