Solved

Replacing content from a cfhttp page grab

Posted on 2003-11-04
6
186 Views
Last Modified: 2013-12-24
I'm trying to search and replace content from a cfhttp page grab. So far it's working fine except that there are dynamicly generated links that I need to append code to the end of. The start of the URL to be edited remains constant on all links however the end of the link changes dynamicly. For example the URL would look something like:
<A HREF=http://www.mywebsitecontent.com/dynamic/stories/E/ELECTION_RDP>  

The URL will remain static except for the last part E/ELECTION_RDP>

What I need to do is append some code on to the end of the URL so that it would look something like:
<A HREF=http://www.mywebsitecontent.com/dynamic/stories/E/ELECTION_RDP?SITE=MYSITE&SECTION=HOME>

The code that I am appending to the end of the URL will remain constant, I just need a way for the searh and replace function to find the end of the URL and append my code on the end.

Here is an example of what I have been doing to format the output from the cfhttp:

<cfhttp method="get" url="www.mywebsitecontent.com/TOPHEADLINE_THREE_ONLY-rich.html" resolveurl="yes">
</cfhttp>

<cfset newText = reReplaceNoCase(cfhttp.filecontent, "<SPAN CLASS='byttl'><br>[^<]+</span>", "", "ALL")>
<cfset newText2 = reReplaceNoCase(newText, "<SPAN[^>]+>", "", "ALL")>
<cfset newText3 = reReplaceNoCase(newText2, "<IMAGE[^>]+ >", "", "ALL")>
<cfset newText4 = reReplaceNoCase(newText3, "<IMG[^>]+>", "", "ALL")>
<cfset newText5 = reReplaceNoCase(newText4, "<TABLE[^>]+>", "", "ALL")>
<cfset newText6 = reReplaceNoCase(newText5, "<TR[^>]+>", "", "ALL")>
<cfset newText7 = reReplaceNoCase(newText6, "<TD[^>]+>", "", "ALL")>
<cfset newText8 = reReplaceNoCase(newText7, "<FONT[^>]+>", "", "ALL")>
<cfset newText9 = reReplaceNoCase(newText8, "<!--[^>]+>", "", "ALL")>

<cfset output = #ReplaceList(newText9, "<TR>,</TR>,<TD>,</TD>,</TABLE>,&nbsp;,</SPAN>" , ",,,,,,")#>

<cfoutput>#output#</cfoutput>

I think it would be possible to replace the part of the URL I need to change using a reReplaceNoCase if I there was some kind of wild card for the code that is dynamic.
0
Comment
Question by:McHack
  • 3
  • 2
6 Comments
 
LVL 15

Expert Comment

by:danrosenthal
ID: 9683439
This should do it...

<CFSET my_string = "<A HREF=http://www.mywebsitecontent.com/dynamic/stories/E/ELECTION_RDP>">

<CFSET my_string = REREPLACENOCASE(my_string,
"(<A[^>]+)(HREF=""?)+([^ ""\>]*)(.*)","\1\2\3&YourAdditionHere=1\4","ALL")>

<CFOUTPUT>
#htmlcodeformat(my_string)#
</CFOUTPUT>
0
 
LVL 4

Expert Comment

by:procept
ID: 9685098
Hi,

I would make a very little change to danrosenthal's code, to also include tags that quote the attributes with single quotes:
<CFSET my_string = REREPLACENOCASE(my_string,
"(<A[^>]+)(HREF=[""']?)+([^ ""'\>]*)(.*)","\1\2\3&YourAdditionHere=1\4","ALL")>

Chris




0
 

Author Comment

by:McHack
ID: 9688403
Well I just can't get it to work. I've been working with it for quit a while and one time I did get just the first URL to work but I'm not sure what I did I just don't have a very good understanding of regular expressions (does any one know of a good online reference for regular expressions?) Anyway it seems to me if there was a way to search for the ending ">" in the URLs and replace them with "SITE=MYSITE&SECTION=HOME>" all should be good. Any ideas?

Thanks
0
Simplifying Server Workload Migrations

This use case outlines the migration challenges that organizations face and how the Acronis AnyData Engine supports physical-to-physical (P2P), physical-to-virtual (P2V), virtual to physical (V2P), and cross-virtual (V2V) migration scenarios to address these challenges.

 

Author Comment

by:McHack
ID: 9688469
Correction, that last line in my message should have read:
"?SITE=MYSITE&SECTION=HOME>"
0
 
LVL 4

Accepted Solution

by:
procept earned 250 total points
ID: 9693031
Hi,

just replacing the ">" can be done, but, what if you encounter URLs with more attributes than just href, or if the href attribute is quoted???

I just tested the reg ex, and, it works perfectly. Just replace "myString" with your variable. Maybe you can show us some code...

If you are 100% sure that there never will be any other attributes and that there never will be quotes around the href, the following might do.
<CFSET my_string = REREPLACENOCASE(my_string, "(<A HREF=[^<]+)>", "\1&YourAdditionHere=1>","ALL")>

HTH,

Chris
0
 

Author Comment

by:McHack
ID: 9720318
Hey Crhis , I've been running the last idea you had (replacing ">") for several days and it's been working great!  Thanks a lot!
0

Featured Post

Ransomware: The New Cyber Threat & How to Stop It

This infographic explains ransomware, type of malware that blocks access to your files or your systems and holds them hostage until a ransom is paid. It also examines the different types of ransomware and explains what you can do to thwart this sinister online threat.  

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Periodically we have to update or add SSL certificates for customers. Depending upon your hosting plan you may be responsible for the installation and/or key generation. In the wake of Heartbleed many sites were forced to re-key. We will concen…
Introduction This article explores the design of a cache system that can improve the performance of a web site or web application.  The assumption is that the web site has many more “read” operations than “write” operations (this is commonly the ca…
This video shows how to quickly and easily add an email signature for all users on Exchange 2016. The resulting signature is applied on a server level by Exchange Online. The email signature template has been downloaded from: www.mail-signatures…
In an interesting question (https://www.experts-exchange.com/questions/29008360/) here at Experts Exchange, a member asked how to split a single image into multiple images. The primary usage for this is to place many photographs on a flatbed scanner…

821 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question