• User Attivo

    [Risolto] N Nuovi messaggi ....codice asp!! HELP

    Non potendo modificare il mio ultimo post aperto sono costretto ad aprirne un altro!
    Quindi prego i mod di cancellare il mio ultimo post quello dove chiedo di vedere il codice sorg di una pagina asp!
    Ora passo alla domanda...
    ho una porzione di codice eccolo :


    <%

    'If the user has logged in then the Logged In User ID number will not be 0 and not 2 for the guest account
    If lngLoggedInUserID <> 0 AND lngLoggedInUserID <> 2 Then
    		
    	'Link to user cp
    	Response.Write(vbCrLf & "   <div style=""float:left;"">")
    	If blnBanned = False Then Response.Write ("<img src=""" & strImagePath & "member_control_panel." & strForumImageType & """ title=""" & strTxtMemberCPMenu & """ alt=""" & strTxtMemberCPMenu & """ style=""vertical-align: text-bottom"" />&nbsp;<a href=""member_control_panel.asp" & strQsSID1 & """>" & strTxtMemberCPMenu & "</a>")
    	Response.Write ("&nbsp;&nbsp;<img src=""" & strImagePath & "messenger." & strForumImageType & """ alt=""" & strTxtNewMessages & """ title=""" & strTxtNewMessages & """ style=""vertical-align: text-bottom"" /> <a href=""pm_welcome.asp" & strQsSID1 & """>" & strTxtNewMessages & "</a>")%>
    	<!-- #include file="pm_check_inc.asp" --><%
    	Response.Write("</div>")
    End If
    

    %>


    questa porzione codice sopra, appartiene ad una pagina asp chiamata status_bar_header_inc.asp
    praticamente il codice in questione mi crea accanto alla scritta control Panel una scritta sui PM relativi all'utente loggato!
    Ora ho un problema...non riesco a far visualizzare il numero dei PM nuovi che ha ricevuto l'utente...difatti mi lascia come testo Nuovi Messaggi...io clicco li e mi apre il mio spazio dei miei messaggi privati!!
    come si fa a far spuntare il numero di MP nuovi ricevuti???
    Come potete notare c'è un INCLUDE di una pagina che si chiama pm_check con questo codice :


    Dim intNotifiedNoOfPMs
    Dim intNumOfNewPM

    'If the user is logged in and there account is active display if they have private messages
    If intGroupID <> 2 AND blnActiveMember AND blnPrivateMessages AND blnACode = False Then

    'Display the number of new pm's
    If intNoOfPms > 0 Then
    	Response.Write("&nbsp;&nbsp;<img src=""" & strImagePath & "new_private_message." & strForumImageType & """ title=""" & intNoOfPms & " " & strTxtNewMessages & """ alt=""" & intNoOfPms & " " & strTxtNewMessages & """ /> <a href=""pm_welcome.asp" & strQsSID1 & """><strong>" & intNoOfPms & "</strong> " & strTxtNewMessages & "</a>")
    Else
    	Response.Write("&nbsp;&nbsp;<img src=""" & strImagePath & "private_message." & strForumImageType & """ title=""0 " & strTxtNewMessages & """ alt=""0 " & strTxtNewMessages & """ /> <a href=""pm_welcome.asp" & strQsSID1 & """>0 " & strTxtNewMessages & "</a>")
    End If
    
    'Get the number of PM's the user has been notified of from cookie
    If isNumeric(getSessionItem("notifiedPMs")) Then intNotifiedNoOfPMs = CLng(getSessionItem("notifiedPMs")) Else intNotifiedNoOfPMs = 0
    		
    
    'If the number of un-read PM's is higher then the user has been notified of, they have a new PM so tell them
    If intNoOfPms > intNotifiedNoOfPMs Then
    		
    	Call saveSessionItem("notifiedPMs", intNoOfPms)
    		
    	'Display the alert
    	Response.Write("<script language=""JavaScript""><!-- " & _
    	vbCrLf & vbCrLf & "//Display pop for new private message" & _
    	vbCrLf & "checkPrivateMsg = confirm('" & strTxtYouHave & " " & intNoOfPms & " " & strTxtNewPMsClickToGoNowToPM & "')" & _
    	vbCrLf & "if (checkPrivateMsg == true) {" & _
    	vbCrLf & "	window.location='pm_inbox.asp" & strQsSID1 & "'" & _
    	vbCrLf & "}" & _
    	vbCrLf & "// --></script>")
    End If
    

    End If
    %>


    non credo c'entri molto con quello che devo andare a modificare....oppure si??
    attendo vostro aiuto


  • User Attivo

    Niente Ragazzi ci sono riuscito da solo 🙂 grazie lo stesso!