Solved

VB Script with a FRAME TARGET

Posted on 1998-08-14
7
905 Views
Last Modified: 2012-05-04
How do I target another frame using VB script for banner ads in a differant frame,
When the banner ad comes up in FRAME1, I want to click on it, but target frame2.
How can I do this?

This is the script I am using:


     FILE NAME: what ever the web page is called as long as it ends with .asp
     this is to tell it to read the script.

     <HTML>
     <HEAD><TITLE>VBScript Using the Ad Rotator</TITLE></HEAD>
     <BODY BGCOLOR=#FFFFFF>
     <H3>VBScript Using the Ad Rotator</H3>

     <%  Set Ad = Server.CreateObject("MSWC.Adrotator") %>
     <%= Ad.GetAdvertisement("adrot.txt") %>
     <BR>

     </BODY>
     </HTML>
     ----------------------------------------------------------------------------------

     This is the script for what banner is seen
     FILE NAME: adrot.txt
     redirect /cgi-asp/adredir.asp
     width 460
     height 60
     border 1
     *
     http://www.e-scope.com/test/ad_1.gif
     http://www.e-scope.com
     Astro Mt. Bike Company
     20

     http://www.e-scope.com/test/ad_2.gif
     http://www.e-scope.com/hotel_pg/hotel_pg.htm
     Arbor Shoes
     20

     http://www.e-scope.com/test/ad_3.gif
     http://www.e-scope.com
     Clocktower Sporting Goods
     30

     http://www.e-scope.com/test/ad_4.gif
     http://www.e-scope.com
     GG&G
     30
     ----------------------------------------------------------------------------------------

     This is the script for the redirection after clicking on the banner
     FILE NAME: adredir.asp

     <% response.redirect (request.QueryString("url")) %>

Thanks
Paul S. Aiello
0
Comment
Question by:paulvb
  • 3
  • 3
7 Comments
 
LVL 1

Expert Comment

by:soeding
ID: 1468929
paulvb,
automatisation with VBScript is good and fine.
But if there are no methods...
Regards
0
 

Author Comment

by:paulvb
ID: 1468930
SO how can I do this?
What is needed?
0
 
LVL 1

Expert Comment

by:KEWL
ID: 1468931
Window.parent.frames("framename").location.href="www.so-and-so.com"
0
Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

 

Author Comment

by:paulvb
ID: 1468932
There was no answer in the comment box.
0
 
LVL 1

Expert Comment

by:KEWL
ID: 1468933
what do you mean?
0
 

Author Comment

by:paulvb
ID: 1468934
Now there is an answer, before the answer box was blank.
How can I grade this now? This is the answer I need.
Excellant
0
 
LVL 1

Accepted Solution

by:
KEWL earned 70 total points
ID: 1468935
when it says 'text above' it means that the answer is in the second top box.
0

Featured Post

Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

Question has a verified solution.

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

There are many ways to remove duplicate entries in an SQL or Access database. Most make you temporarily insert an ID field, make a temp table and copy data back and forth, and/or are slow. Here is an easy way in VB6 using ADO to remove duplicate row…
Introduction While answering a recent question (http://www.experts-exchange.com/Q_27402310.html) in the VB classic zone, I wrote some VB code in the (Office) VBA environment, rather than fire up my older PC.  I didn't post completely correct code o…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

776 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