Cannot send a variable to the next page???? 1

[brimike]

Hello All,
This is an ongoing issue. At this time I am about ready to throw in the towel. I am trying to send a variable, a simple email address through a query string. I have tried everything in the book. The string always comes out empty.

Here we go for the last time. This is the sending page with connections to the db.


NOTE: I am trying to send this link and the AgentEmail variable to the next page except the link to the next page wher thir is supposed to be an email address is empty or if I use <%=Request.QueryString%> I get ?

<a href="contactustest1.asp?mls=<%=varMLS%>&LID=<%=varLID%>&Associate=<%=varAssociate%>&AgentEmail=<%=AgentEmail%>"><span class="style10">Request Additional Information</span></a>
---------------------
<link href="globaldynamic.css" type="text/css">
<%
varMLS = Trim(Request("mls"))
IF TRIM(varMLS) = "" THEN
varMLS = Trim(Request("lid"))
END IF
IF TRIM(Request.QueryString("LAID")) <> "" THEN
varListingAgent = TRIM(Request.QueryString("LAID"))
END IF
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DSN=Pre;PWD="
SQL = "SELECT * FROM current_listings WHERE (Status='A') "
IF Trim(varMLS) <> "" THEN
SQL = SQL & " AND (MLS# = '" & varMLS & "' OR LID = '" & varMLS & "')"
END IF
IF Trim(varListingAgent) <> "" THEN
SQL = SQL & " AND (Associates_Last_Name = '" & varListingAgent & "' OR Listing_Assoc2 = '" & varListingAgent & "' OR Listing_Assoc3 = '" & varListingAgent & "')"
END IF

'response.write "sql=" & sql & "<br>"

Set rs = Server.CreateObject("ADODB.Recordset")
'response.write "<br>SQL = " & sql & "<br>"
rs.Open sql, conn, 3, 3

%>

<%If NOT rs.EOF THEN
varLID = quoteIt(trim(rs("LID")))
varDate_Entered = quoteIt(trim(rs("Date_Entered")))
varOfficeNumber = quoteIt(trim(rs("OfficeNumber")))
varPS_Date = quoteIt(trim(rs("PS_Date")))
varPC_Date = trim(rs("PC_Date"))
varClose_Sale_Date = quoteIt(trim(rs("Close_Sale_Date")))
varMLS = quoteIt(trim(rs("MLS#")))
varOther_MLS = quoteIt(trim(rs("Other_MLS#")))
varClass = quoteIt(trim(rs("Class")))
varZone = quoteIt(trim(rs("Zone")))
varStatus = quoteIt(trim(rs("Status")))
varVillage_Key = quoteIt(trim(rs("Village_Key#")))
varOld_Naples_Key = quoteIt(trim(rs("Old_Naples_Key#")))
varVanderbilt_Key = quoteIt(trim(rs("Vanderbilt_Key#")))
varPelican_Landing = quoteIt(trim(rs("Pelican_Landing#")))
varProperty = quoteIt(trim(rs("Property")))
varProperty_Address = quoteIt(trim(rs("Property_Address")))
varPrice = quoteIt(trim(rs("Price")))
IF varPrice <> "" Then
varPrice = formatcurrency(varPrice,0)
End IF
varLower_List_Price = quoteIt(trim(rs("Lower_List_Price")))
varCommPercntSell = quoteIt(trim(rs("CommPercntSell")))
varCommPercntList = quoteIt(trim(rs("CommPercntList")))
varTotalCommPercnt = quoteIt(trim(rs("TotalCommPercnt")))
varOtherPrice = quoteIt(trim(rs("OtherPrice")))
varSignReqd = quoteIt(trim(rs("SignReqd")))
varOwnerName = quoteIt(trim(rs("OwnerName")))
varOwners_Last_Name = quoteIt(trim(rs("Owners_Last_Name")))
varFirst_Name = quoteIt(trim(rs("First_Name")))
varSpouse_Name = quoteIt(trim(rs("Spouse_Name")))
varPrefix = quoteIt(trim(rs("Prefix")))
varSecond_Owner_or_Co = quoteIt(trim(rs("Second_Owner_or_Co")))
varMailing_Address = quoteIt(trim(rs("Mailing_Address")))
varCity = quoteIt(trim(rs("City")))
varState = quoteIt(trim(rs("State")))
varZip = quoteIt(trim(rs("Zip")))
varCountry = quoteIt(trim(rs("Country")))
varHome_Phone = quoteIt(trim(rs("Home_Phone")))
varOffice_Phone = quoteIt(trim(rs("Office_Phone")))
varFax_Number = quoteIt(trim(rs("Fax_Number")))
varUnit_Phone_Number = quoteIt(trim(rs("Unit_Phone_Number")))
varAssociates_Last_Name = quoteIt(trim(rs("Associates_Last_Name")))
varList_Date = quoteIt(trim(rs("List_Date")))
varExp_Date = quoteIt(trim(rs("Exp_Date")))
varLA = quoteIt(trim(rs("LA")))
varTA = quoteIt(trim(rs("TA")))
varBR = quoteIt(trim(rs("BR")))
varBA = quoteIt(trim(rs("BA")))
varFurnished = quoteIt(trim(rs("Furnished")))
varShowing_Instructions = quoteIt(trim(rs("Showing_Instructions")))
varCondo_Sub = quoteIt(trim(rs("Condo_Sub")))
varC_S_Address = quoteIt(trim(rs("C_S_Address")))
varAd__newspaper = quoteIt(trim(rs("Ad_#__newspaper_")))
varAd_Copy = quoteIt(trim(rs("Ad_Copy")))
varBanner = quoteIt(trim(rs("Banner")))
varAssociate = quoteIt(trim(rs("Associate")))
varKeybox = quoteIt(trim(rs("Keybox")))
varListing_Assoc2 = quoteIt(trim(rs("Listing_Assoc2")))
varListing_Assoc3 = quoteIt(trim(rs("Listing_Assoc3")))
varRange_Code = quoteIt(trim(rs("Range_Code")))
varRange = quoteIt(trim(rs("Range")))
varIproperty_Type = quoteIt(trim(rs("Iproperty_Type")))
varProperty_Address = quoteIt(trim(rs("Property_Address")))
varIneighborhood = quoteIt(trim(rs("Ineighborhood")))
varIcatagory = quoteIt(trim(rs("Icatagory")))
varIlocation = quoteIt(trim(rs("Ilocation")))
varRemove_Date = quoteIt(trim(rs("Remove_Date")))
varHalfbath = quoteIt(trim(rs("Halfbath")))
varZip1 = quoteIt(trim(rs("Zip1")))
varYear_Built = quoteIt(trim(rs("YearBuilt")))
varVirtual_Tour = quoteIt(trim(rs("Virtual_Tour")))
'Response.write rs("VirtualTourAddress")
'response.end
varVirtualTourAddress = quoteIt(trim(rs("VirtualTourAddress")))
varAvailableSqFeet = quoteIt(trim(rs("AvailableSqFeet")))
varVTURL = ""
varURL = ""

strAddress = " "
strAddress = varC_S_Address & " " &varZip1
'strAddress = varC_S_Address & " " & varCity & " " & varState & " " &varZip1
strAddress = TRIM(strAddress)
'response.write "strAddress = ||" & strAddress & "||"

'=========================================================================================================
SQL = "SELECT * FROM imgList WHERE (PhotoName LIKE '"& varMLS & "%') AND ((PhotoName NOT LIKE '%FP%')) ORDER BY OrderNumber"
Set rs2 = Server.CreateObject("ADODB.Recordset")
rs2.Open sql, conn, 3, 3
If rs2.recordcount <> 0 Then
varPhotoName = trim(rs2("PhotoName"))
varGraphic = "

http://properties.com/listingsphotos-all/"

& varPhotoName
Else
varGraphic = "/graphics/no_photo_small.gif"
End If
'=========================================================================================================
End If
'======================================================================================================
' End If
'------------------------------------------------------------------------------------------------------------->
'--[Photo Loop Ends HERE]------------------------------------------------------------------------------------->
'------------------------------------------------------------------------------------------------------------->
%>
<%
'NEW LAYOUT START
%>
<style type="text/css">
<!--
.style5 {font-family: Arial, Helvetica, sans-serif; font-weight: bold; font-size: 12px; color: #FFFFFF; text-decoration:none; }
.style10 {font-family: Arial, Helvetica, sans-serif; font-weight: bold; font-size: 12px; color: #FFFF00; text-decoration: none; }
-->
</style>



<script language="JavaScript" type="text/JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
</script>


<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr bgcolor="#000000">
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr align="center" bgcolor="#000000" class="style5">
<td valign="bottom" style="padding:3px;" nowrap><a href="javascript:history.back(1)"><span class="style5">
Back to Search Results</span></a></td>
<td valign="bottom" style="padding:3px;" nowrap><a href="javascript:window_open('savelisting.asp?mls=<%=varMLS%>', '400', '450')"><span class="style5">Save Listing to Favorites</span></a></td>


<td valign="bottom" style="padding:3px;" nowrap><a href="contactustest1.asp?mls=<%=varMLS%>&LID=<%=varLID%>&Associate=<%=varAssociate%>&AgentEmail=<%=AgentEmail%>&<%=Request.QueryString%>"><span class="style5">Request Additional Information</span></a></td>
<style type="text/css">
.mapLink {
color:#FFFFFF;
text-decoration:none;
}
</style>
<td valign="bottom" style="padding:3px;" nowrap><% CALL GoogleMap(varPrice,strAddress,varMLS,varLID)%></td>
</tr>
<%
IF InStr(1,varAd_Copy,"Christie",1) THEN
%>
<tr bgcolor="#FFFFFF">
<td colspan="4" align="left" valign="bottom" style="padding:3px;background-repeat:repeat-y; background-image:url(images/ChristiesBar.jpg); color:#FFFFFF" nowrap><strong>Christie's Great Estate</strong></td>
</tr>
<%
END IF
%>
<tr align="left" valign="top" bgcolor="#FFFFFF">
<td colspan="4">

<%
CALL GetPhotos(TRIM(varMLS))
%>

<%
'response.write("FloorPlan Photo Count: |"&FPCOUNT&"|")
CALL GetFP(TRIM(varMLS))
%>
</td>
</tr>
<tr class="resultsCopy" style="text-align:left" align="left" valign="top" bgcolor="#FFFFFF">
<td colspan="4">
<B><%=varCondo_Sub%></B>
<%
IF Trim(varIproperty_Type) <> "" THEN
Response.write("<br>" & Trim(varIproperty_Type))
END IF
%>

</td>
</tr>


<% IF Trim(varAd_Copy) <> "" THEN %>
<tr class="resultsCopy" style="text-align:left; padding:5px;" align="left" valign="top" bgcolor="#FFFFFF">
<td colspan="4">
<strong><br>Description:</strong>
<%=varAd_Copy%>
</td>
</tr>
<tr class="resultsCopy" style="text-align:left; padding:5px;" align="left" valign="top" bgcolor="#FFFFFF">
<td colspan="4">
<table width="100%" border="0" cellpadding="3" cellspacing="0">
<tr class="resultsCopy" style="text-align:left; padding:5px;" valign="top" bgcolor="#FFFFFF">
<td width="7%" nowrap>
<% IF Trim(varPrice) <> "" THEN Response.write("<BR><b>Sale Price:&nbsp;</b>") %>
<% IF Trim(varMLS) <> "" THEN Response.write("<BR><b>MLS:&nbsp;</b>") %>
<% IF Trim(varBR) <> "" THEN Response.write("<BR><b>Bedrooms:&nbsp;</b>") %>
<% IF Trim(varBA) <> "" THEN Response.write("<br><b>Baths:&nbsp;</b>") %>
<% IF Trim(varTA) <> "" THEN Response.write("<br><b>Total SqFt:&nbsp;</b>") %>
</td>
<td width="25%" nowrap>
<% IF Trim(varPrice) <> "" THEN Response.write("<BR>" & varPrice) %>
<% IF Trim(varMLS) <> "" THEN Response.write("<BR>" & varMLS) %>
<% IF Trim(varBR) <> "" THEN Response.write("<BR>" & varBR) %>
<% IF Trim(varBA) <> "" THEN Response.write("<br>" & varBA & "") %>
<% IF Trim(varTA) <> "" THEN Response.write("<br>" & varTA & " sqft") %>
</td>


<td width="5%" nowrap><br>
<% IF Trim(varYear_Built) <> "" THEN Response.write("<br><b>Year Built&nbsp;</b>") %>
<% 'IF Trim(varHOA_Fees) <> "" AND Trim(varHOA_Fees) > 0 THEN Response.write("<br><b>HOA Fees:&nbsp;</b>") %>
<% IF Trim(varTax_Year) <> "" AND Trim(varTaxes) <> "" THEN Response.write("<br><b>" & varTax_Year & " Taxes</b>") %>
</td>
<td width="63%" nowrap><br>
<% IF Trim(varYear_Built) <> "" THEN Response.write("<br>" & varYear_Built) %>
<% 'IF Trim(varHOA_Fees) <> "" AND Trim(varHOA_Fees) > 0 THEN Response.write("<br>" & FORMATCURRENCY(varHOA_Fees,0)) %>
<% IF Trim(varTax_Year) <> "" AND Trim(varTaxes) <> "" THEN Response.write("<br>" & FORMATCURRENCY(varTaxes,0)) %>
</td>
</tr>
</table>
</td>
</tr>
<tr class="resultsCopy" style="text-align:left; padding:5px;" align="left" valign="top" bgcolor="#FFFFFF">
<td colspan="4">
<strong><br>
This Property Presented By:<BR>
</strong>
<table width="100%" border="0" cellspacing="0" cellpadding="4">
<tr align="left" valign="top">
<td width="33%"><% CALL GetAgent(varAssociates_Last_Name)%></td>
<td width="33%"><% CALL GetAgent(varListing_Assoc2)%></td>
<td width="33%"><% CALL GetAgent(varListing_Assoc3)%></td>
</tr>
</table> </td>
</tr>
<% END IF %>
</table>
</td>
</tr>
</table>

<br>
</td>
</tr>
</table>
</td>
</tr>
</table>
<%
SUB GetPhotos(MLS)
SET NewConn=Server.CreateObject("ADODB.Connection")
NewConn = "DSN=Pre;PW=;"
set rsPhotos=Server.CreateObject("ADODB.recordset")
photoSQL = "SELECT * FROM imgList WHERE MLS ='" & MLS & "' ORDER BY OrderNumber;"
'response.write photoSQL &"<BR><BR>"
'response.write Conn &"<BR><BR>"
rsPhotos.Open photoSQL, NewConn
If NOT rsPhotos.EOF OR NOT rsPhotos.BOF then
FPCOUNT = 0
DIM fpimage
photoTable = "<table border='0' cellpadding='2' cellspacing='1' width='100%' class='resultsCopy'><tr><td><table border='0' cellpadding='3' cellspacing='0' width='100%' ><tr class='resultsCopy'>"

Do while not rsPhotos.EOF

k = k + 1
reDim photoarray(k)
IF InStr(rsPhotos("photoName"),"FP") OR InStr(rsPhotos("photoName"),"fp")THEN
FPCOUNT = (FPCOUNT + 1)
FP = TRUE
'FpImage(FPCOUNT)= (rsPhotos("live") & "/" & rsPhotos("photoName"))
'FpImage(FPCOUNT) = (rsPhotos("PID"))
rsPhotos.movenext
ELSE
photoarray(k) = rsPhotos("live") & "/" & rsPhotos("photoName")
'Start Row - Cell Count is Count - 1
'SET MAIN IMAGE
IF count = 0 THEN
PhotoTable = photoTable & "<td rowspan='10' valign='top' class='resultsCopy'><img src='" & rsPhotos("live")&"/"&rsPhotos("photoName") & "' border='0' id='main'></td><td valign='top'><div id='photo"&K&"' style='display:block'><table border='0' cellpadding='0' cellspacing='1' width='100%'><tr>"
END IF
count = (count + 1)
totalCount = (totalCount + 1)
xCount = (xCount + 1)
IF TotalCount = 13 THEN
hide = Cint(K / 12)
show = Cint(hide+1)
prev = Cint(hide-1)
IF hide = 0 THEN
hide =1
END IF
IF prev = 0 THEN
prev =1
END IF
photoTable = photoTable & "</table><table width='100%' cellpadding='3' cellspacing='0' valign='bottom'><tr class='stats'><td valign='bottom' align='left'><a class='resultsCopy' href='javascript:displayDiv(&quot;photo"&hide&"&quot;,&quot;none&quot;displayDiv(&quot;photo"&prev&"&quot;,&quot;block&quot;'><< Previous</a></td><td align='right' valign='bottom'><a class='resultsCopy' href='javascript:displayDiv(&quot;photo"&show&"&quot;,&quot;block&quot;displayDiv(&quot;photo"&hide&"&quot;,&quot;none&quot;'>Next >></a></td></tr></table></div><div id='photo"&show&"' style='display:none'>"
TotalCount = 1
photoTable = photoTable & "<table border='0' cellpadding='0' cellspacing='1' ><tr class='resultsCopy'>"
END IF

IF Count < 4 AND Count > 0 THEN
PhotoTable = photoTable & "<td valign='top' height='1' class='resultsCopy'><a href='javascript:swapImage(&quot;main&quot;,&quot;&quot;,&quot;" & rsPhotos("live")&"/"&rsPhotos("photoName") & "&quot;' class='stats'><img src='" & rsPhotos("live")&"/"&rsPhotos("photoName") & "' width='80' height='55' border='0' id='"&rsPhotos("PID")&"'></a></td>"
ELSE
count = 1
PhotoTable = photoTable & "</tr><tr class='resultsCopy'><td valign='top' height='1'><a href='javascript:swapImage(&quot;main&quot;,&quot;&quot;,&quot;" & rsPhotos("live")&"/"&rsPhotos("photoName") & "&quot;' class='stats'><img src='" & rsPhotos("live")&"/"&rsPhotos("photoName") & "' width='80' height='55' border='0' id='"&rsPhotos("PID")&"'></a></td>"
END IF
rsPhotos.movenext
END IF
loop
rsPhotos.close
SET rsPhotos=NOTHING
SET NewConn=NOTHING
IF (totalCount < 12) AND (xCount > 12) THEN
photoTable = photoTable & "<table width='100%' cellpadding='3' cellspacing='0' valign='bottom'><tr class='stats'><td valign='bottom' align='left' class='resultsCopy'><a class='resultsCopy' href='javascript:displayDiv(&quot;photo"&hide&"&quot;,&quot;block&quot;displayDiv(&quot;photo"&show&"&quot;,&quot;none&quot;'><< Previous</a></td><td align='right' valign='bottom'><a class='resultsCopy' href='javascript:displayDiv(&quot;photo"&show&"&quot;,&quot;block&quot;displayDiv(&quot;photo"&hide&"&quot;,&quot;none&quot;'>Next >></a></td></tr></table></div>"
END IF

PhotoTable = photoTable & "</table></table></div></table>"
ELSE
PhotoTable = photoTable & "<img src='/graphics/no_photo_large.gif' border='1'></table></div>"
END IF

response.write(photoTable)

':: Show virtual tour if database has the address in the field

If VarVirtualTourAddress <> "" then
Response.write "<a target=_blank href='"&VarVirtualTourAddress&"'><img border='0' src='graphics/home_search_virtual_tour.gif' ></a>"
End if

END SUB

SUB GetFP(MLS)
SET NewConn=Server.CreateObject("ADODB.Connection")
NewConn = "DSN=Pre;PW=;"
set rsFPPhoto=Server.CreateObject("ADODB.recordset")
photoSQL = "SELECT * FROM imgList WHERE MLS ='" & MLS & "' AND(photoName LIKE '%FP%' OR photoName LIKE '%fp%') ORDER BY OrderNumber;"
rsFPPhotpen photoSQL, NewConn
FPCOUNT = 0

If NOT rsFPPhoto.EOF OR NOT rsFPPhoto.BOF then
FPCOUNT = (FPCOUNT + 1)
fpTable = "<table border='0' cellpadding='2' cellspacing='1' width='100%' bgcolor='FFFFFF' class='resultsCopy'><tr><td><b>&nbsp;View Floor Plans "
Do while not rsFPPhoto.EOF
'response.write("<BR>" & rsFPPhoto("live")&"/"&rsFPPhoto("photoName"))

fpTable = fpTable & "<a href='javascript:void window.open(&#39;" & rsFPPhoto("live")&"/"&rsFPPhoto("photoName") & "&#39;,&#39;FloorPlans&#39;,&#39;resizable=1,width=500,height=400&#39;'>"& FPCOUNT &"</a>&nbsp;"
rsFPPhoto.movenext
LOOP
fpTable = fpTable & "</b></td></tr></table>"
response.write fpTable
fpTable = ""
rsFPPhoto.close
SET rsFPPhoto=NOTHING
SET NewConn=NOTHING

'response.write("TESTING: " & fpTable)
END IF
END SUB
SUB GetAgent(strIn)
IF TRIM(strIn) <> "" THEN
SET NewConn=Server.CreateObject("ADODB.Connection")
NewConn = "DSN=Pre
;PW=;"
set rsAgent=Server.CreateObject("ADODB.recordset")
agentSQL = "SELECT * FROM ASSOCIATES WHERE AgentStatus='Active' AND Last_Name = '" & strIn & "';"
rsAgent.Open agentSQL, NewConn
IF NOT rsAgent.EOF AND NOT rsAgent.BOF THEN
response.write "<table width='100%' cellpadding='3' cellspacing='0' border='0'>"
IF Trim(rsAgent("Picture")) <> "" AND NOT IsNull(rsAgent("Picture")) THEN
strPic = "<a href='agent.asp?aid=" & Trim(rsAgent("LAID")) & "&agent=" & Trim(rsAgent("Last_Name")) & "'><img src='/MultiMedia/agents/"&SERVER.URLENCODE(Trim(lcase(rsAgent("Picture"))))&"' width='100' border='0'></a>"
ELSE
strPic = "<a href='agent.asp?aid=" & Trim(rsAgent("LAID")) & "&agent=" & Trim(rsAgent("Last_Name")) & "'><img src='/images/premier/Search/NoAgent.jpg' width='100' border='0'></a>"
END IF
response.write "<tr class='resultsCopy'><td valign='top' align='left' rowspan='7' height='10'>" & strPic & "</td>"
response.write "<td nowrap valign='top'><b><a class='dynamiclinks1' href='agent.asp?aid=" & Trim(rsAgent("LAID")) & "&agent=" & Trim(rsAgent("Last_Name")) & "'>" & Trim(rsAgent("Listing_Associate")) & "</a></b>"
response.write "<br>"
IF Trim(lcase(rsAgent("Title"))) = "realtor" THEN
response.write "Sales Associate/REALTOR^{<font size='1'>&reg;</font>}"
ELSE
response.write Trim(rsAgent("Title"))
END IF
If NOT IsNULL(rsAgent("Address1")) THEN Response.Write("<BR>" & TRIM(rsAgent("Address1")) & "")
If NOT IsNULL(rsAgent("Address2")) THEN Response.Write("<BR>" & TRIM(rsAgent("Address2")) & "")
If NOT IsNULL(rsAgent("City")) THEN Response.Write("<BR>" & TRIM(rsAgent("City")) & "")
If NOT IsNULL(rsAgent("State")) THEN Response.Write(", " & TRIM(rsAgent("State")) & "")
If NOT IsNULL(rsAgent("Zip")) THEN Response.Write("&nbsp;&nbsp;" & TRIM(rsAgent("Zip")) & "")
response.write("<br>")
If NOT IsNULL(rsAgent("phoneNumber1")) THEN Response.Write("<br>Phone: " & TRIM(rsAgent("phoneNumber1")) & "")
If NOT IsNULL(rsAgent("fax1")) THEN Response.Write("<br>Fax: &nbsp;&nbsp;&nbsp;&nbsp;" & TRIM(rsAgent("fax1")) & "")
If NOT IsNULL(rsAgent("email")) THEN Response.Write("<br><a href='mailto:" & TRIM(rsAgent("email")) & "'>Email</a>")

Dim AgentEmail
AgentEmail = (rsAgent("email"))
Response.Write(AgentEmail)
Request.QueryString("AgentEmail")
response.write "</td></tr></table>"
END IF
rsAgent.close
SET rsAgent = NOTHING
SET NewConn = NOTHING
ELSE
EXIT SUB
END IF
strPic = ""
strIn = ""
END SUB
%>
<a href="contactustest1.asp?mls=<%=varMLS%>&LID=<%=varLID%>&Associate=<%=varAssociate%>&AgentEmail=<%=AgentEmail%>"><span class="style10">Request Additional Information</span></a>

----------------------------------
This is the recieving page of the variable:
-------------------------------------
<%@ Language=VBScript %>

<%
Option Explicit
%>

<%
' -----------------------------------------------------
' CDONTS Email send script
' ©

http://www.designplace.org/

' Comments must remain intact for re-use of this code
' -----------------------------------------------------
dim strErrText, strAction, varMLS, varMessage, varAssociate, varAgentEmail, varMessage2, varMessage3, AgentEmail, AgentEmail2

strAction = Request.QueryString("action")
AgentEmail = Request.QueryString("AgentEmail")
Select Case strAction

Case "err1"
strErrText = "<span style='font-family: Verdana; font-size: 11px;color: red; font-weight: bold;'>Error: Please enter your First Name.</span>"
Case "err2"
strErrText = strErrText & "<span style='font-family: Verdana; font-size: 11px;color: red; font-weight: bold;'>Error: Please enter your Last Name.</span>"
Case "err3"
strErrText = strErrText & "<span style='font-family: Verdana; font-size: 11px;color: red; font-weight: bold;'>Error: Please enter your e-mail address.</span>"

End Select
%>

<!--#include file="inc_contactusheader.asp" -->
<!--#include file="inc_contactus2.asp" -->

<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="100%" bgcolor="#FFFFFF">
<tr>
<td width="100%" height="100%">
<p align="center"></p>
<div align="center">
<center>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0" class="bgpositionNEWS">
<tr>
<td>&nbsp;</td>
<td class="title">&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr>
<td width="3%">&nbsp;</td>
<td width="67%" class="devTXT"><div align="right">
<p>&nbsp;</p>
<p align="left">Contact Us <span style="font-size: large">TEST12 </span></p>
</div></td>
<td width="30%">&nbsp;</td>
</tr>
<tr>
<td rowspan="3">&nbsp;</td>
<td class="devTXT"><p><font color="#CC0000" size="4"><strong>*</strong></font><font color="#FF0000" size="3"></font>
indicates a required field</p></td>
<td rowspan="3">&nbsp;</td>
</tr>
<tr>
<td class="devTXT">For more information about our services
please provide us with your information and we will be </td>
</tr>
<tr>
<td class="devTXT">back in touch with you shortly. And thanks
again for visiting the Premier-Properties Company website.</td>
</tr>
<tr>

<td>&nbsp;</td>
<td><table width="100%" height="766" border="0" cellpadding="2" cellspacing="0">
<tr>
<td height="23" valign="top" class="frontfacebold">
<%
if strAction > "" then
response.write strErrText
end if
%>
<%
varMLS = request("mls")
If varMLS <> "" Then
varMessage ="Please send more information on property " & varMLS
End If
%>
<%
varAssociate = request("Associate")
If varAssociate <> "" Then
varMessage2 ="" & varAssociate
End If
%>


<%
AgentEmail = request("AgentEmail")
If AgentEmail <> "" Then
varMessage2 ="" & AgentEmail
End If
%>
</td>
</tr>
<tr>
<td height="743" valign="top">
<form name="form1" method="post" action="NEW/send_it_test1.asp">

<div align="right"> <strong><font color="#CC0000" size="4">
</font></strong><font color="#990000" size="2" face="Arial, Helvetica, sans-serif"><strong></strong></font>
<table width="106%" border="0" cellspacing="3" cellpadding="2">
<tr class="devTXT">
<td width="13%"><div align="right" class="smclientfont">First
Name: </div></td>
<td width="37%" colspan="2"> <div align="left">
<input name="firstname" type="text" class="formfield" value="">
<font color="#CC0000" size="4"><strong>*</strong></font></div></td>
<td width="12%"><div class="frontface">
<div align="right" class="smclientfont">Last
Name:</div>
</div></td>
<td width="38%"> <div align="left">
<input name="lastname" type="text" class="formfield" value="">
<font color="#CC0000" size="4"><strong>*</strong></font></div></td>
</tr>
<tr class="devTXT">
<td><div align="right">Company:</div></td>
<td colspan="2"><input name="company" type="text" class="formfield" value=""></td>
<td><div align="right">eMail:</div></td>
<td><input name="email" type="text" class="formfield" value="">
<font color="#CC0000" size="4"><strong>*</strong></font></td>
</tr>
<tr class="devTXT">
<td><div align="right" class="smclientfont">Position:</div></td>
<td colspan="2"> <div align="left">
<input name="position" type="text" class="formfield" value="">
</div></td>
<td><div class="frontface">
<div align="right" class="smclientfont">State<font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial">:</font></font></font></div>
</div></td>
<td align="left"> <div align="left"> <font size="-1" face="arial"><span class="frontface"><font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial">
<input name="state" type="text" class="formfield" value="">
</font></font></font></span></font><font color="#CC0000" size="4"></font></div></td>
</tr>
<tr class="devTXT">
<td><div align="right">Street:</div></td>
<td colspan="2"><input name="street" type="text" class="formfield" value=""></td>
<td><div align="right"><span class="smclientfont">Zip:</span></div></td>
<td><font size="-1" face="arial"><span class="frontface"><font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial"><span class="frontface"><font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial"><span class="frontface"><font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial"><span class="frontface"><font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial">
<input name="zip" type="text" class="formfield" value="" size="8" maxlength="8">
</font></font></font></span></font></font></font></span></font></font></font></span>
</font></font></font></span></font></td>
</tr>
<tr class="devTXT">
<td><div class="smclientfont">
<div align="right">City:</div>
</div></td>
<td colspan="2"><input name="city" type="text" class="formfield" value=""></td>
<td><div align="right" class="smclientfont"><font size="-1" face="arial"></font></div></td>
<td align="left"><font size="-1" face="arial"><span class="frontface"><font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial"><span class="frontface"><font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial"><span class="frontface"><font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial">
</font></font></font></span></font></font></font></span></font></font></font></span></font></td>
</tr>
<tr class="devTXT">
<td><div class="frontface">
<div align="right" class="smclientfont">Country:</div>
</div></td>
<td colspan="2"> <div align="left"> <span class="frontface"><font size="-1" face="arial"><span class="frontface"></span>
<input type=hidden name="country" value="">
<select name="country" class="devTXT">
<option value="United States / Canada"selected>United
States / Canada</option>
<option value="Afgha">Afghanistan</option>
<option value="Albania">Albania</option>
<option value="Algeria">Algeria</option>
<option value="American Samoa">American Samoa</option>
<option value="Andorra">Andorra</option>
<option value="Angola">Angola</option>
<option value="Antarctica">Antarctica / Norfolk
Island</option>
<option value="Antigua">Antigua and Barbuda</option>
<option value="Argentina">Argentina</option>
<option value="Armenia">Armenia</option>
<option value="Aruba">Aruba</option>
<option value="Ascension">Ascension Island</option>
<option value="Australia">Australia</option>
<option value="Austria">Austria</option>
<option value="Azerbaijan">Azerbaijan</option>
<option value="Bahrain">Bahrain</option>
<option value="Bangladesh">Bangladesh</option>
<option value="Belarus">Belarus</option>
<option value="Belgium">Belgium</option>
<option value="Belize">Belize</option>
<option value="Benin">Benin</option>
<option value="Bhutan">Bhutan</option>
<option value="Bolivia">Bolivia</option>
<option value="Bosnia">Bosnia &amp; Herzogovina</option>
<option value="Botswana">Botswana</option>
<option value="Brazil">Brazil</option>
<option value="Brunei">Brunei</option>
<option value="Bulgaria">Bulgaria</option>
<option value="Burkina Faso">Burkina Faso</option>
<option value="Burundi">Burundi</option>
<option value="Cambodia">Cambodia</option>
<option value="Cameroon">Cameroon</option>
<option value="Cape Verde Islands">Cape Verde
Islands</option>
<option value="236">Central African Republic</option>
<option value="235">Chad</option>
<option value="56">Chile</option>
<option value="86">China (PRC)</option>
<option value="57">Colombia</option>
<option value="269">Comoros / Mayotte Island</option>
<option value="242">Congo</option>
<option value="243">Congo, Dem. Rep. of (former
Zaire)</option>
<option value="Cook">Cook Islands</option>
<option value="506">Costa Rica</option>
<option value="385">Croatia</option>
<option value="53">Cuba</option>
<option value="357">Cyprus</option>
<option value="420">Czech Republic</option>
<option value="45">Denmark</option>
<option value="246">Diego Garcia</option>
<option value="253">Djibouti</option>
<option value="670">East Timor</option>
<option value="593">Ecuador</option>
<option value="20">Egypt</option>
<option value="503">El Salvador</option>
<option value="240">Equatorial Guinea</option>
<option value="291">Eritrea</option>
<option value="372">Estonia</option>
<option value="251">Ethiopia</option>
<option value="298">Faeroe Islands</option>
<option value="500">Falkland Islands</option>
<option value="679">Fiji Islands</option>
<option value="358">Finland</option>
<option value="33">France</option>
<option value="594">French Guiana</option>
<option value="689">French Polynesia</option>
<option value="241">Gabon</option>
<option value="220">Gambia</option>
<option value="995">Georgia</option>
<option value="49">Germany</option>
<option value="233">Ghana</option>
<option value="350">Gibraltar</option>
<option value="30">Greece</option>
<option value="299">Greenland</option>
<option value="590">Guadeloupe</option>
<option value="502">Guatemala</option>
<option value="224">Guinea (PRP)</option>
<option value="245">Guinea-Bissau</option>
<option value="592">Guyana</option>
<option value="509">Haiti</option>
<option value="504">Honduras</option>
<option value="852">Hong Kong</option>
<option value="36">Hungary</option>
<option value="354">Iceland</option>
<option value="91">India</option>
<option value="62">Indonesia</option>
<option value="98">Iran</option>
<option value="964">Iraq</option>
<option value="353">Ireland</option>
<option value="972">Israel</option>
<option value="39">Italy</option>
<option value="225">Ivory Coast (C&ocirc;te
d`Ivoire)</option>
<option value="81">Japan</option>
<option value="962">Jordan</option>
<option value="254">Kenya</option>
<option value="686">Kiribati</option>
<option value="850">Korea (North)</option>
<option value="82">Korea (South)</option>
<option value="965">Kuwait</option>
<option value="996">Kyrgyz Republic</option>
<option value="856">Laos</option>
<option value="371">Latvia</option>
<option value="961">Lebanon</option>
<option value="266">Lesotho</option>
<option value="231">Liberia</option>
<option value="218">Libya</option>
<option value="423">Liechtenstein</option>
<option value="370">Lithuania</option>
<option value="352">Luxembourg</option>
<option value="853">Macau</option>
<option value="389">Macedonia</option>
<option value="261">Madagascar</option>
<option value="265">Malawi</option>
<option value="60">Malaysia</option>
<option value="960">Maldives</option>
<option value="223">Mali Republic</option>
<option value="356">Malta</option>
<option value="692">Marshall Islands</option>
<option value="596">Martinique / French Antilles</option>
<option value="222">Mauritania</option>
<option value="230">Mauritius</option>
<option value="52">Mexico</option>
<option value="691">Micronesia (Federal States
of)</option>
<option value="808">Midway Island / Wake Island</option>
<option value="373">Moldova</option>
<option value="377">Monaco</option>
<option value="976">Mongolia</option>
<option value="212">Morocco</option>
<option value="258">Mozambique</option>
<option value="95">Myanmar</option>
<option value="264">Namibia</option>
<option value="674">Nauru</option>
<option value="977">Nepal</option>
<option value="31">Netherlands</option>
<option value="599">Netherlands Antilles /
Cura&ccedil;ao</option>
<option value="687">New Caledonia</option>
<option value="64">New Zealand</option>
<option value="505">Nicaragua</option>
<option value="227">Niger</option>
<option value="234">Nigeria</option>
<option value="683">Niue</option>
<option value="47">Norway</option>
<option value="968">Oman</option>
<option value="92">Pakistan</option>
<option value="680">Palau</option>
<option value="970">Palestine</option>
<option value="507">Panama</option>
<option value="675">Papua New Guinea</option>
<option value="595">Paraguay</option>
<option value="51">Peru</option>
<option value="63">Philippines</option>
<option value="48">Poland</option>
<option value="351">Portugal</option>
<option value="974">Qatar</option>
<option value="262">R&eacute;union Island</option>
<option value="40">Romania</option>
<option value="7">Russian Federation</option>
<option value="250">Rwanda</option>
<option value="869">Saint Kitts and Nevis</option>
<option value="378">San Marino</option>
<option value="239">S&atilde;o Tom&eacute; and
Principe</option>
<option value="966">Saudi Arabia</option>
<option value="221">Senegal</option>
<option value="248">Seychelles Islands</option>
<option value="232">Sierra Leone</option>
<option value="65">Singapore</option>
<option value="421">Slovak Republic</option>
<option value="386">Slovenia</option>
<option value="677">Solomon Islands</option>
<option value="252">Somalia</option>
<option value="27">South Africa</option>
<option value="34">Spain</option>
<option value="94">Sri Lanka</option>
<option value="290">St. Helena</option>
<option value="508">St. Pierre / Miquelon</option>
<option value="249">Sudan</option>
<option value="597">Suriname</option>
<option value="268">Swaziland</option>
<option value="46">Sweden</option>
<option value="41">Switzerland</option>
<option value="963">Syria</option>
<option value="886">Taiwan</option>
<option value="992">Tajikistan</option>
<option value="255">Tanzania</option>
<option value="66">Thailand</option>
<option value="228">Togo</option>
<option value="690">Tokelau</option>
<option value="676">Tonga Islands</option>
<option value="216">Tunisia</option>
<option value="90">Turkey</option>
<option value="993">Turkmenistan</option>
<option value="688">Tuvalu</option>
<option value="256">Uganda</option>
<option value="Ukraine">Ukraine</option>
<option value="971">United Arab Emirates</option>
<option value="United Kingdom">United Kingdom</option>
<option value="United States / Canada">United
States / Canada</option>
<option value="0">Unknown</option>
<option value="598">Uruguay</option>
<option value="998">Uzbekistan</option>
<option value="678">Vanuatu</option>
<option value="58">Venezuela</option>
<option value="84">Vietnam</option>
<option value="681">Wallis and Futuna Islands</option>
<option value="685">Western Samoa</option>
<option value="967">Yemen</option>
<option value="381">Yugoslavia</option>
<option value="260">Zambia</option>
<option value="263">Zimbabwe</option>
</select>
</font></span></div></td>
<td><div align="center"></div></td>
<td><div align="left"><font size="-1" face="arial"><span class="frontface"><font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial"><span class="frontface"><font size="-1" face="arial"><font size="-1" face="arial"><font size="-1" face="arial">
</font></font></font></span> </font></font></font></span>
</font></div></td>
</tr>
<tr class="devTXT">
<td><div align="right" class="smclientfont">Phone:</div></td>
<td colspan="2">(
<input name="areacode" type="text" class="formfield" value="" size="3" maxlength="3">
)
<input name="phone" type="text" class="formfield" value="" size="7" maxlength="7">
<font face="arial">&nbsp; </font> </td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td colspan="2">&nbsp;</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td colspan="2"><strong>I am interested in the following:</strong></td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td><div align="right" class="smclientfont"></div></td>
<td>Purchasing a Residence: </td>
<td><input name="purchase" type="radio" value="yes" checked>
Yes
<input type="radio" name="purchase" value="no">
No </td>
<td> <font face="arial">&nbsp;</font></td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td>Listing a Property:</td>
<td><input name="list" type="radio" value="yes" checked>
Yes
<input type="radio" name="list" value="no">
No </td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td>Rental information:</td>
<td><input name="rental" type="radio" value="yes" checked>
Yes
<input type="radio" name="rental" value="no">
No</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td>Commercial Property:</td>
<td><input name="commercial" type="radio" value="yes" checked>
Yes
<input type="radio" name="commercial" value="no">
No</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td>Our Property Magazine:</td>
<td><input name="mag" type="radio" value="yes" checked>
Yes
<input type="radio" name="mag" value="no">
No</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td>Our E-newsletter.</td>
<td><input name="newsletter" type="radio" value="yes" checked>
Yes
<input type="radio" name="newsletter" value="no">
No</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td>Timeframe:</td>
<td><select name="timeframe" class="devTXT" id="timeframe">
<option>3 - 6 months</option>
<option>6 -12 months</option>
<option>1 - 2 Years</option>
</select></td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td>Property Type:</td>
<td><select name="proptype" class="devTXT" id="proptype">
<option>Single Family
<option>Condominium
<option>Investment
</select></td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td><span class="smclientfont">Agent</span>'s Name: </td>
<td><%=varAssociate%></td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td>Agent's Email: </td>
<td><%=AgentEmail%></td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td>&nbsp;</td>
<td><input name="mls" type="hidden" id="mls" value="<%=varMessage%>"></td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td>&nbsp;</td>
<td><%Response.Write request.querystring("AgentEmail")%></td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td><div align="right"></div></td>
<td colspan="2"><label>
<input name="hiddenMLS" type="hidden" id="hiddenMLS">
</label></td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td><div align="right">Questions?</div></td>
<td colspan="2">&nbsp;</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td colspan="2" align="left"> <div align="left">
<textarea name="message" cols="30" rows="6" class="formfield"><%=varMessage%>
<%request.querystring("AgentEmail")%>
</textarea>
</div></td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td colspan="2">&nbsp;</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr class="devTXT">
<td>&nbsp;</td>
<td colspan="2"><input name="submit" type="submit" class="SearchButtons" style="background-color:#000000 ;font-size: 9pt; color: white; font-weight:bold" value="Submit"> </td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
</table>
<p align="right">&nbsp; </p>
</div>
</form></td>
</tr>
</table></td>
<td>&nbsp;</td>
</tr>
</table>
</center>
</div>
<p align="center">



</p>
<div align="center">
<center>
</center>
</div>
</td>
</tr>
</table>
</center>
</div>
</table>
<!--#include file="inc_footer.asp" -->

-------------------------------------------------

 

[Tarwn]

Could you point out
1) The original link (which i believe is the first line of code in your post)
2) Only the code where you try to read the querystring values from that link

and 3) if I was correct and that first line is your link, post the HTML output of that first line so we can see what type of values are being placed in the querystring for that anchor tag (do a view source and copy it out of there)

 

[brimike]

1.)<a href="contactustest1.asp?mls=<%=varMLS%>&LID=<%=varLID%>&Associate=<%=varAssociate%>&AgentEmail=<%=AgentEmail%>"><span class="style10">Request Additional Information</span></a>


2.)IF Trim(lcase(rsAgent("Title"))) = "realtor" THEN
response.write "Sales Associate/REALTOR^{<font size='1'>&reg;</font>}"
ELSE
response.write Trim(rsAgent("Title"))
END IF
If NOT IsNULL(rsAgent("Address1")) THEN Response.Write("<BR>" & TRIM(rsAgent("Address1")) & "")
If NOT IsNULL(rsAgent("Address2")) THEN Response.Write("<BR>" & TRIM(rsAgent("Address2")) & "")
If NOT IsNULL(rsAgent("City")) THEN Response.Write("<BR>" & TRIM(rsAgent("City")) & "")
If NOT IsNULL(rsAgent("State")) THEN Response.Write(", " & TRIM(rsAgent("State")) & "")
If NOT IsNULL(rsAgent("Zip")) THEN Response.Write("&nbsp;&nbsp;" & TRIM(rsAgent("Zip")) & "")
response.write("<br>")
If NOT IsNULL(rsAgent("phoneNumber1")) THEN Response.Write("<br>Phone: " & TRIM(rsAgent("phoneNumber1")) & "")
If NOT IsNULL(rsAgent("fax1")) THEN Response.Write("<br>Fax: &nbsp;&nbsp;&nbsp;&nbsp;" & TRIM(rsAgent("fax1")) & "")
If NOT IsNULL(rsAgent("email")) THEN Response.Write("<br><a href='mailto:" & TRIM(rsAgent("email")) & "'>Email</a>")

Dim AgentEmail
AgentEmail = (rsAgent("email"))
Response.Write(AgentEmail)
Request.QueryString("AgentEmail")
response.write "</td></tr></table>"
END IF
rsAgent.close
SET rsAgent = NOTHING
SET NewConn = NOTHING
ELSE



3.)Here is the page that it is being sent to, empty.
tr class="devTXT">
<td>&nbsp;</td>
<td>Agent's Email: </td>
<td>lid=23879</td>
<td>&nbsp;</td>
<td>&nbsp;</td>

 

[Sheco]

The problem is the value of AgentEmail is not set to the value from your recordset until AFTER it is used to print your link.

So, at the time the link is printed, AgentEmail is empty.

 

[Sheco]

PS: My previous post refers to the "sending" page.

 

[brimike]

How do I fix it. I moved the link below the call to the db as well as the Dim and still the link is empty.
Any ideas.

 

[Sheco]

in the sending page, find where you have this:

Dim AgentEmail
AgentEmail = (rsAgent("email"))

And replace it with this:

Dim AgentEmail
AgentEmail = rsAgent("email")
Response.Write "<br>The email field value from the recordset is: " & AgentEmail & "<br>" & vbCrLf

Response.Write "Here is a debug link: <a href='contactustest1.asp?mls=" _
             & varMLS & "&LID=" & varLID & "&Associate=" & varAssociate _
             & "&AgentEmail=" & AgentEmail & "'><span class='style10'>" _
             & "Request Additional Information</span></a><br>" & vbCrLf

PS: I suspect there still may be a problem if any of the other values contain spaces. This may require the use of Server.URLEncode.

 

[Sheco]

When I mention the spaces, consider what would happen if the value of Associate was Tom Brown.

Your link would be broken by the space in between Tom and Brown.

Watch what happens when tek-tips tries to make a hyperlink out of the following fake URL containing a space:

http://www.tek-tips.com/fake.asp?MLS=1234567890&Associate=Tom

Brown&AgentEmail=SomethingGoesHere

 

[brimike]

You did it. Thanks. I really appreciate it.