<!--#include file="inc_profile.asp"-->
<% Call DisplayProfileForm %>
<script language="JavaScript">
<!-- hide from JavaScript-challenged browsers
function pmmembers() { var MainWindow = window.open ("pop_members.asp", "","toolbar=no,location=no,menubar=no,scrollbars=yes,width=250,height=500,top=100,left=100,resizeable=yes,status=no");
}
// done hiding -->
</script>
<a href="javascript:pmmembers();">Memberlist</a> <script language="JavaScript">
<!-- hide from JavaScript-challenged browsers
function pmmembers() { var MainWindow = window.open ("pm_pop_members.asp", "","toolbar=no,location=no,menubar=no,scrollbars=yes,width=250,height=500,top=100,left=100,resizeable=yes,status=no");
}
// done hiding -->
</script> <script language="JavaScript">
<!-- hide from JavaScript-challenged browsers
function MembersPop() { var MainWindow = window.open ("pop_members.asp", "pmSendTo","toolbar=no,location=no,menubar=no,scrollbars=yes,width=250,height=500,top=100,left=100,resizeable=yes,status=no");
}
// done hiding -->
</script> " <td bgColor=""" & strPopUpTableColor & """><input maxLength=""50"" name=""sendto"" value=""" & Request.Querystring("mname") & """ size=""50""> <font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """><a href=""members.asp"">Memberlist</a> " " <td bgColor=""" & strPopUpTableColor & """><input maxLength=""50"" name=""sendto"" value=""" & Request.Querystring("mname") & """ size=""50""> <font face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """><a href=""JavaScript:MembersPop();"">Memberlist</a> " strErrMessage = strErrMessage & "<font face=""" & strDefaultFontFace & """ color=""" & StrHiLiteFontColor & """ size=""" & strDefaultFontSize & """>Sorry, there is no one registered with that MemberName: " & arrNames(i)& "</font>" if not arrNames(i) = "" then
strErrMessage = strErrMessage & "<font face=""" & strDefaultFontFace & """ color=""" & StrHiLiteFontColor & """ size=""" & strDefaultFontSize & """>Sorry, there is no one registered with that MemberName: " & arrNames(i)& "</font>"
end ifResponse.Write " <script language=""Javascript"" type=""text/javascript"">" & vbNewLine & _
" <!-- hide" & vbNewLine & _
" function pick(member) {" & vbNewLine & _
" if (window.opener.document.SearchForm.Message.createTextRange && window.opener.document.SearchForm.SearchMember.caretPos) {" & vbNewLine & _
" var caretPos = window.opener.document.SearchForm.SearchMember.caretPos;" & vbNewLine & _
" caretPos.text = caretPos.text.charAt(caretPos.text.length - 1) == ' ' ? member + ' ' : member;" & vbNewLine & _
" window.opener.document.SearchForm.SearchMember.focus();" & vbNewLine & _
" } else {" & vbNewLine & _
" window.opener.document.SearchForm.SearchMember.value+=member;" & vbNewLine & _
" window.opener.document.SearchForm.SearchMember.focus();" & vbNewLine & _
" }" & vbNewLine & _
" window.close();" & vbNewLine & _
" }" & vbNewLine & _
" // -->" & vbNewLine & _
" </script>" & vbNewLineOriginally posted by MaD2ko0lThat was it! Thanks so much for all of your help! Now go get some rest!
however i have noteiced on 1 line you have this
if (window.opener.document.SearchForm.Message.createTextRange
that shhould be
if (window.opener.document.SearchForm.SearchMember.createTextRange
try that and see what happends
Originally posted by MaD2ko0lI don't think so. However, I have a question about if I should allow non members to be able to see the pop up members list on the search page. What do you think?
ko0l...any more problems yet?