Forums

AJAX & JAVASCRIPT

This topic is locked

Using MapQuest Window

Mark Gwaltney

Posted 25 Jul 2004 10:20:38

has voted

Vote

25 Jul 2004 10:20:38 Mark Gwaltney posted:

I am using the MapQuest Window extension and it installs and works fine. However, my ASP page has some additional Javascript image swaps. The image swap script runs fine, until you click the MapQuest Window, then the image swap script will not run correctly (my "onclick" events no longer work). It's like the MapQuest Window affects the image swap script.

Has anyone experienced this problem? Is there a priticular order that I should arrange my JS functions within my ASP page?

Thx, Mark

Replies

Mark Gwaltney

Replied 29 Jul 2004 07:55:53

29 Jul 2004 07:55:53 Mark Gwaltney replied:

Here is part of my code with the image swaps and the Mapquest window:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<%
Dim rslist__MMColParam
rslist__MMColParam = "1"
If (Request.QueryString("srchlistnum"

<> ""

Then
rslist__MMColParam = Request.QueryString("srchlistnum"

End If
%>
<%
Dim rslist
Dim rslist_numRows

Set rslist = Server.CreateObject("ADODB.Recordset"

rslist.ActiveConnection = MM_maindb_STRING
rslist.Source = "SELECT * FROM qlistings WHERE list_number = " + Replace(rslist__MMColParam, "'", "''"

+ ""
rslist.CursorType = 0
rslist.CursorLocation = 2
rslist.LockType = 1
rslist.Open()

rslist_numRows = 0
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>
function Thumbnail(tmb_suff,tmb_filename)
Dim tmb_NewFilename, tmb_Path, tmb_PosPath, tmb_PosExt
if not isnull(tmb_filename) then
tmb_PosPath = InStrRev(tmb_filename,"/"

tmb_Path = ""
if tmb_PosPath > 0 then
tmb_Path = mid(tmb_filename,1,tmb_PosPath)
end if
tmb_PosExt = InStrRev(tmb_filename,"."

if tmb_PosExt > 0 then
tmb_NewFilename = tmb_Path & mid(tmb_filename,tmb_PosPath+1,tmb_PosExt-(tmb_PosPath+1)) & tmb_suff & ".jpg"
else
tmb_NewFilename = tmb_Path & mid(tmb_filename,tmb_PosPath+1,len(tmb_filename)-tmb_PosPath) & tmb_suff & ".jpg"
end if
end if
Thumbnail = tmb_NewFilename
end function
</SCRIPT>
<html>
<head>

<title>Gulf Coast For Sale by Owner - Listing Detail Page</title>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="/Stylesheets/gulfcoastfsbo.css" rel="stylesheet" type="text/css">

<script language="JavaScript" type="text/JavaScript">
<!--

function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#"

!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"

)>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
//-->
</script>

</head>

<body background="/Images/bg-lines1.GIF" onLoad="MM_preloadImages('<%=(rslist.Fields.Item("photo_main"

.Value)%>','<%=(rslist.Fields.Item("photo2"

.Value)%>','<%=(rslist.Fields.Item("photo3"

.Value)%>','<%=(rslist.Fields.Item("photo4"

.Value)%>','<%=(rslist.Fields.Item("photo5"

.Value)%>','<%=(rslist.Fields.Item("photo6"

.Value)%>','<%=(rslist.Fields.Item("photo7"

.Value)%>','<%=(rslist.Fields.Item("photo8"

.Value)%>','<%=(rslist.Fields.Item("photo9"

.Value)%>','<%=(rslist.Fields.Item("photo10"

.Value)%>')">

<table width="750" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">

<tr>
<td height="120" colspan="2" align="center" valign="middle"><font color="#000000"><strong>Logo
Here!</strong></font></td>
<td colspan="8" align="center" valign="middle"><font color="#000000" size="+2"><img src="/Images/gcfsbo_baner1.jpg" width="570" height="120"></font></td>
</tr>
<tr>
<td height="5" colspan="10" valign="top" bgcolor="E7E7CE"><img src="/Images/spacer.gif" width="1" height="1"></td>
</tr>
<tr>
<td width="110" height="15" valign="top" class="menuboardernotext"><img src="/Images/spacer.gif" width="1" height="1"><a name="top"></a></td>
<td colspan="2" valign="top" class="menuboardernotext"><img src="/Images/spacer.gif" width="1" height="1"></td>
<td width="80" valign="top" class="menuboardernotext"><img src="/Images/spacer.gif" width="1" height="1"></td>
<td width="80" valign="top" class="menuboardernotext"><img src="/Images/spacer.gif" width="1" height="1"></td>
<td width="80" valign="top" class="menuboardernotext"><img src="/Images/spacer.gif" width="1" height="1"></td>
<td width="80" align="center" valign="middle" class="menuboarder"><img src="/Images/spacer.gif" width="1" height="1"><a href="/Sitepages/Prices.asp">Create
Listing</a></td>
<td width="80" valign="top" class="menuboarder"><a href="/Sitepages/Prices.asp">Listing
Prices</a></td>
<td width="80" valign="top" class="menuboarder">Contact Us</td>
<td width="80" valign="top" class="menuboarder"><a href="/start.htm">Home</a></td>
</tr>
<tr>
<td height="5" colspan="10" valign="top" class="bottom"><img src="/Images/spacer.gif" width="1" height="1"></td>
</tr>
<tr>
<td height="1"></td>
<td width="70"></td>
<td width="10"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
</table>

<table width="750" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">

<tr>
<td width="115" height="513" valign="top"> 
<table width="100%" border="0" cellpadding="0" cellspacing="0">

<tr>
<td width="115" height="63" valign="top" class="search"> <form action="/Sitepages/listing_detail.asp" method="get" name="search" id="search">
<font color="#000000" size="2"><strong>Search</strong></font><br>
Enter List Number<br>
<input name="srchlistnum" type="text" id="srchlistnum" size="8">
 
<input type="submit" name="Submit" value="Go">
</form></td>
</tr>
<tr>
<td height="92" align="center" valign="top" class="sidemenu"><div align="left"><font color="#000000" size="2"><strong>List
With Us</strong></font><br>
<br>
<strong><a href="/Sitepages/Prices.asp"><font size="1">Create
Listing</font></a><br>
</strong><a href="/Sitepages/Prices.asp"><strong>Listing Prices</strong></a></div></td>
</tr>
<tr>
<td height="106" valign="top" class="sidemenu"><font color="#000000" size="2"><strong>Key
Links</strong></font><br> <br>
Member Login<br>
Contact Us<br> <a href="/start.htm">Home</a> </td>
</tr>
<tr>
<td height="268" valign="top" class="sidemenu"><p><font color="#000000" size="2"><strong>Resources</strong></font><br>
<br>
Mortgage Rates<br>
Loan Calc<br>
Sales Contract</p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p></td>
</tr>
</table>
</td>
<td width="635" valign="top">
<script language="javascript">
function jm_MapQuest(country, address, city, state, zip) {
//Joel Martinez 2001
window.open("www.mapquest.com/maps/map.adp?country="+ escape(country) +"&address="+ escape(address) +"&city="+ escape(city) +"&state="+ escape(state) +"&zipcode="+ escape(zip) +"&homesubmit.x=0&homesubmit.y=0","jm_mapquestwin","width=720,height=400,toolbar=1,menubar=1,status=1,resizable=1,location=0,directories=0,scrollbars=1"

;
}
</script>
<table width="100%" border="0" cellpadding="2" cellspacing="0" class="stdtext">

<tr>
<td width="1" rowspan="3" valign="top"><img src="/Images/spacer.gif" width="1" height="1"></td>
<td width="1" height="59"></td>
<td width="607" valign="top"><div align="center"><strong><font color="#000000" size="3">Listing
Detail</font></strong><font color="#000000" size="-2"><strong><br>
</strong></font><font color="#000066" size="-2">For additional information,
please email <strong> <font size="-1"><a href="mailto:<%=(rslist.Fields.Item("email"

.Value)%>"><%=(rslist.Fields.Item("email"

.Value)%></a> </font>or call <font size="-1"><%=(rslist.Fields.Item("phone1"

.Value)%></font>.</strong></font><font color="#000000" size="-2"><strong><br>
</strong></font></div></td>
<td width="1"></td>
<td width="5" rowspan="3" valign="top"><img src="/Images/spacer.gif" width="1" height="1"></td>
</tr>
<tr>
<td height="1147"></td>
<td valign="top" bgcolor="#BAD0E2"> <table width="100%" border="2" cellpadding="0" cellspacing="0" bordercolor="#CCE7F4" bgcolor="#CCE7F4" class="stdtext">

<tr valign="middle">
<td width="601" height="3"></td>
</tr>
<tr valign="middle">
<td height="72" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">

<tr>
<td height="46" colspan="3" valign="top"><div align="center"><strong><font color="#FF0000" size="2"></font><font color="#000066" size="3"><%=(rslist.Fields.Item("title"

.Value)%></font><font color="#FF0000" size="2"></font><font color="#000066" size="3"><br>
<font size="-1"><%=(rslist.Fields.Item("property_address"

.Value)%>, <%=(rslist.Fields.Item("pcs"

.Value)%></font> <font size="-1"><%=(rslist.Fields.Item("pz"

.Value)%></font></font></strong></div></td>
</tr>
<tr>
<td width="219" height="24" valign="middle" bordercolor="#4892C8" bgcolor="#4892C8"><strong><font color="#000066" size="2"> List
Number: </font></strong> <font color="#000066" size="2"><%=(rslist.Fields.Item("list_number"

.Value)%></font></td>
<td width="160" align="center" valign="middle" bordercolor="#4892C8" bgcolor="#4892C8">
<% If rsList.Fields.Item("dtstamp"

.Value > (now()-30) Then %> <img src="/Images/newlisting.gif" width="95" height="18" align="absmiddle">
<% End If %> </td>
<td width="222" valign="middle" bordercolor="#4892C8" bgcolor="#4892C8"><div align="right"><font size="2"><strong><font color="#000066">Price:</font></strong><font color="#000066">
<%= FormatCurrency((rslist.Fields.Item("ask_price"

.Value), 0, -2, -2, -2) %><font size="2"></font></font><font size="2">   </font></font></div></td>
</tr>
</table></td>
</tr>
<tr valign="middle">
<td height="291" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">

<tr>
<td width="89" height="289" align="center" valign="middle">
<% If rsList.Fields.Item("Sold"

.Value = (yes) Then %> <img src="/Images/sold.gif" width="70" height="80">
<% End If %> </td>
<td width="419" align="center" valign="middle"> <%If rslist.Fields.Item("photo_main"

.Value = "" Then %> <img src="/images/nopic.gif" width="250" height="200" border="0">
<% Else %> <img src="<%=(rslist.Fields.Item("photo_main"

.Value)%>" name="photomain" id="photomain">
<% End If %> </td>
<td width="93" align="center" valign="middle"> <% If rsList.Fields.Item("Sold"

.Value = (yes) Then %> <img src="/Images/sold.gif" width="70" height="80">
<% End If %> </td>
</tr>

<tr>
<td height="0"></td>
<td></td>
<td></td>
</tr>
</table></td>
</tr>
<tr valign="middle">
<td height="26" valign="middle"><table width="100%" border="0" cellpadding="0" cellspacing="0">

<tr>
<td width="601" height="24" valign="middle" bgcolor="#4892C8">
<div align="center"><strong><font color="#000066" size="2">Additional
Photos</font></strong> <font color="#000066" size="-2">(click
photo to enlarge)</font></div></td>
</tr>

</table></td>
</tr>
<tr valign="middle">
<td height="122" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">

<tr>
<td width="64" rowspan="2" valign="top"> </td>
<td width="95" height="60" align="center" valign="middle">
<a href="javascript:;" onclick="MM_swapImage('photomain','','<%=(rslist.Fields.Item("photo_main"

.Value)%>',1)">
<% If rslist.Fields.Item("photo_main"

.Value = "" Then %>
<img src="/images/spacer.gif" width="10" height="10" border="0">
<% Else %>
<img src="<%= Thumbnail("_small",(rslist.Fields.Item("photo_main"

.Value)) %>" name="photo1" border="0" id="photo1">
<% End If %>
</a></td>
<td width="95" align="center" valign="middle"><a href="javascript:;" onclick="MM_swapImage('photomain','','<%=(rslist.Fields.Item("photo2"

.Value)%>',1)">
<% If rslist.Fields.Item("photo2"

.Value = "" Then %>
<img src="/images/spacer.gif" width="10" height="10" border="0">
<% Else %>
<img src="<%= Thumbnail("_small",(rslist.Fields.Item("photo2"

.Value)) %>" name="photo2" border="0" id="photo2">
<% End If %>
</a></td>
<td width="95" align="center" valign="middle"><a href="javascript:;" onclick="MM_swapImage('photomain','','<%=(rslist.Fields.Item("photo3"

.Value)%>',1)">
<% If rslist.Fields.Item("photo3"

.Value = "" Then %>
<img src="/images/spacer.gif" width="10" height="10" border="0">
<% Else %>
<img src="<%= Thumbnail("_small",(rslist.Fields.Item("photo3"

.Value)) %>" name="photo3" border="0" id="photo3">
<% End If %>
</a></td>
<td width="95" align="center" valign="middle"><a href="javascript:;" onclick="MM_swapImage('photomain','','<%=(rslist.Fields.Item("photo4"

.Value)%>',1)">
<% If rslist.Fields.Item("photo4"

.Value = "" Then %>
<img src="/images/spacer.gif" width="10" height="10" border="0">
<% Else %>
<img src="<%= Thumbnail("_small",(rslist.Fields.Item("photo4"

.Value)) %>" name="photo4" border="0" id="photo4">
<% End If %>
</a></td>
<td width="95" align="center" valign="middle"><a href="javascript:;" onclick="MM_swapImage('photomain','','<%=(rslist.Fields.Item("photo5"

.Value)%>',1)">
<% If rslist.Fields.Item("photo5"

.Value = "" Then %>
<img src="/images/spacer.gif" width="10" height="10" border="0">
<% Else %>
<img src="<%= Thumbnail("_small",(rslist.Fields.Item("photo5"

.Value)) %>" name="photo5" border="0" id="photo5">
<% End If %>
</a></td>
<td rowspan="2" valign="top"> </td>
</tr>
<tr>
<td height="60" align="center" valign="middle"><a href="javascript:;" onclick="MM_swapImage('photomain','','<%=(rslist.Fields.Item("photo6"

.Value)%>',1)">
<% If rslist.Fields.Item("photo6"

.Value = "" Then %>
<img src="/images/spacer.gif" width="10" height="10" border="0">
<% Else %>
<img src="<%= Thumbnail("_small",(rslist.Fields.Item("photo6"

.Value)) %>" name="photo6" border="0" id="photo6">
<% End If %>
</a></td>
<td align="center" valign="middle"><a href="javascript:;" onclick="MM_swapImage('photomain','','<%=(rslist.Fields.Item("photo7"

.Value)%>',1)">
<% If rslist.Fields.Item("photo7"

.Value = "" Then %>
<img src="/images/spacer.gif" width="10" height="10" border="0">
<% Else %>
<img src="<%= Thumbnail("_small",(rslist.Fields.Item("photo7"

.Value)) %>" name="photo7" border="0" id="photo7">
<% End If %>
</a></td>
<td align="center" valign="middle"><a href="javascript:;" onclick="MM_swapImage('photomain','','<%=(rslist.Fields.Item("photo8"

.Value)%>',1)">
<% If rslist.Fields.Item("photo8"

.Value = "" Then %>
<img src="/images/spacer.gif" width="10" height="10" border="0">
<% Else %>
<img src="<%= Thumbnail("_small",(rslist.Fields.Item("photo8"

.Value)) %>" name="photo8" border="0" id="photo8">
<% End If %>
</a></td>
<td align="center" valign="middle"><a href="javascript:;" onclick="MM_swapImage('photomain','','<%=(rslist.Fields.Item("photo9"

.Value)%>',1)">
<% If rslist.Fields.Item("photo9"

.Value = "" Then %>
<img src="/images/spacer.gif" width="10" height="10" border="0">
<% Else %>
<img src="<%= Thumbnail("_small",(rslist.Fields.Item("photo9"

.Value)) %>" name="photo8" border="0" id="photo9">
<% End If %>
</a></td>
<td align="center" valign="middle"><a href="javascript:;" onclick="MM_swapImage('photomain','','<%=(rslist.Fields.Item("photo10"

.Value)%>',1)">
<% If rslist.Fields.Item("photo10"

.Value = "" Then %>
<img src="/images/spacer.gif" width="10" height="10" border="0">
<% Else %>
<img src="<%= Thumbnail("_small",(rslist.Fields.Item("photo10"

.Value)) %>" border="0">
<% End If %>
</a></td>
</tr>
<tr>
<td height="0"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td width="62"></td>
</tr>
</table></td>
</tr>
<tr valign="middle">
<td height="613" valign="top"><table width="100%" border="0" cellpadding="2" cellspacing="0" class="stdtext">

<tr align="center" valign="middle" bgcolor="#4892C8" >
<td height="24" colspan="2"><strong><font size="2">Property
Location</font></strong></td>
</tr>
<tr>
<td width="258" height="23" align="right" valign="middle"><strong><font size="-1">Property
Address:</font></strong> </td>
<td width="335" valign="middle"><div align="left"><%=(rslist.Fields.Item("property_address"

.Value)%></font></div></td>
</tr>
<tr>
<td height="23" valign="top"> </td>
<td valign="middle"><div align="left"><%=(rslist.Fields.Item("pcs"

.Value)%></font> <font size="-1"><%=(rslist.Fields.Item("pz"

.Value)%></font></div></td>
</tr>
<tr>
<td height="23" align="right" valign="middle"><strong><font size="-1">County:</font></strong></td>
<td valign="middle"><div align="left"><%=(rslist.Fields.Item("property_county"

.Value)%></font></div></td>
</tr>
<tr>
<td height="23" align="right" valign="middle"><strong><font size="-1">Subdivision:</font></strong></td>
<td valign="middle"> <div align="left"><%=(rslist.Fields.Item("subdivision"

.Value)%></font></div></td>
</tr>
<tr>
<td height="23" align="right" valign="middle"><strong><font size="-1">School
District:</font></strong> </td>
<td valign="middle"><div align="left"><%=(rslist.Fields.Item("school_district"

.Value)%></font></div></td>
</tr>
<tr>
<td height="26" align="center" valign="middle"><div align="right"><a href="javascript:jm_MapQuest('US','<%=(rslist.Fields.Item("property_address"

.Value)%>', '<%=(rslist.Fields.Item("pc"

.Value)%>', '<%=(rslist.Fields.Item("ps"

.Value)%>', '<%=(rslist.Fields.Item("pz"

.Value)%>');"><img src="/images/mapquest.jpg" width="150" height="22" border="0" align="absmiddle""0"></a></div></td>
<td valign="middle"><font color="#000066" size="-2"><=
Click to see map to location</font></td>
</tr>
<tr align="center" valign="middle">
<td height="8" colspan="2" valign="top"><img src="/Images/spacer.gif" width="1" height="1"></td>
</tr>
<tr align="center" valign="middle" bgcolor="#4892C8">
<td height="24" colspan="2" valign="top"><strong><font color="#000066" size="2">Property
Information</font></strong></td>
</tr>
<tr align="center" valign="middle">

Thx,
Mark

Mark Gwaltney

Replied 30 Jul 2004 22:58:28

30 Jul 2004 22:58:28 Mark Gwaltney replied:

Problem solved. See the link below:

communities2.microsoft.com/communities/newsgroups/en-us/default.aspx?&guid=&dg=microsoft.public.scripting.jscript&p=1&tid=6cd16ead-8bd0-4132-a7b4-a8ecaca5cec7

Thx,
Mark

Reply to this topic

Latest Extensions

App Connect Summernote File Upload Upload different files in Summernote Editor
App Connect Summernote Simple, yet powerful and modern WYSIWYG Editor
Bootstrap 4 Dynamic Table Generator 2 Automatically generate dynamic data tables
Bootstrap 4 Dynamic Form Generator 2 Auto generate perfect Bootstrap 4 dynamic forms in seconds
App Connect Bootstrap 4 Dynamic Paging Generator Auto generate awesome dynamic Bootstrap 4 paging in seconds
App Connect Event Calendar The most powerful full-sized event calendar for Dreamweaver
DMXzone App Connect Next generation client side framework for data-driven web sites and apps
DMXzone Database Custom Query Create advanced, complex custom SQL queries with ease

Latest Videos

Using App Connect Autocomplete Learn how to add autocomplete functionality on your page, using the App Connect Autocomplete
Creating Custom SQL Queries Learn how to create custom SQL Queries with DMXzone Database Custom Query
Restricting Access to Your Pages Learn how to restrict access to your pages, using DMXzone Security Provider 2
Adding Log Out Functionality with DMXzone Security Provider 2 Learn how to add log out functionality to your page with DMXzone Security Provider 2
Creating a Log In Page with DMXzone Security Provider 2 Learn how to create a log in page with DMXzone Security Provider 2
Setting Up Site Security Settings Learn how to setup your site security, using DMXzone Security Provider 2
Generating an Update Record Form Learn how to create an update record form, using the Bootstrap 4 Dynamic Form Generator 2
Generating an Insert Record Form Learn how to create an insert record form, using the Bootstrap 4 Dynamic Form Generator 2