Snitz - Snitz.it - Forum Adamantine - BUG + FIX Utenti Bloccati ricezione email
    Snitz - Snitz.it - Forum Adamantine
Sostieni il nostro lavoro


Snitz - Snitz.it - Forum Adamantine
Nome Utente:

Password:
 


Registrati
Salva Password
Password Dimenticata?

 

    


Men riservato agli utenti registrati - Registrati  

Nota bene : Nuova versione Adamantine! Leggi il topic relativo!



 Tutti i Forum
 Snitz Mods e Community
 Eventi & Notizie
 Evento: BUG + FIX Utenti Bloccati ricezione email
I seguenti utenti stanno leggendo questo Forum Qui c':




Tutti gli utenti possono inserire NUOVE discussioni in questo forum Tutti gli utenti possono rispondere in questo forum
  Bookmark this Topic  
| Altri..
Autore Discussione Precedente Discussione Discussione Successiva  

Amministratore

Amministratore


Administrator

Genio

Utente Valutato:
Voti:14



Inserito il - 28/07/2008 : 22:21:43  Link diretto a questa discussione  Mostra Profilo  Visita l'Homepage di Amministratore Invia a Amministratore un Messaggio Privato Aggiungi Amministratore alla lista amici
FIX FORUM PLATINUM FULL 3.4.06 - 06


Questo fix Risolve la situazione di un utente bloccato il quale si vede notificare un email al spostamento della propria discussione.
Con questa modifica un utente bloccato, come coerente che sia, non riceve nessuna notifica anche quando tale opzione attivata nel forum.

modificare il file post_info.asp aggiungendo le parti in rosso.


sub DoAutoMoveEmail(TopicNum)
'## Emails Topic Author if Topic Moved.
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.MEMBER_ID," & strMemberTablePrefix & "MEMBERS.M_NAME, " & strMemberTablePrefix & "MEMBERS.M_EMAIL, " & strActivePrefix & "TOPICS.FORUM_ID, " & strActivePrefix & "TOPICS.T_SUBJECT "
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS, " & strActivePrefix & "TOPICS "
strSql = strSql & " WHERE " & strMemberTablePrefix & "MEMBERS.MEMBER_ID = " & strActivePrefix & "TOPICS.T_AUTHOR "
strSql = strSql & " AND " & strActivePrefix & "TOPICS.TOPIC_ID = " & TopicNum
strSql = strSql & " AND " & strMemberTablePrefix & "MEMBERS.M_STATUS <> 0"

set rs2 = my_Conn.Execute (strSql)

If Not rs2.EOF Then

email = rs2("M_EMAIL")
user_name = rs2("M_NAME")
Topic_Title = rs2("T_SUBJECT")
ForumId = rs2("FORUM_ID")
Usernum = rs2("MEMBER_ID")

rs2.close
if lcase(strEmail) = "1" then
strRecipientsName = user_name
strRecipients = email
strSubject = strForumTitle & " - Discussione spostata"
strMessage = "Ciao " & user_name & vbNewLine & vbNewLine
strMessage = strMessage & "La tua discussione sul " & strForumTitle & "." & vbNewLine
strMessage = strMessage & "Dal titolo - " & Topic_Title & "." & vbNewLine & vbNewLine

if not(chkForumAccess(ForumID,Usernum,false)) then
strMessage = strMessage & " stata rimossa dalla visione pubblica, se hai domande in tal proposito contatta l'Amministratore del Forum" & vbNewLine
else
strMessage = strMessage & " stata spostata in un nuovo forum, la puoi vedere qui " & vbNewLine & Left(Request.Form("refer"), InstrRev(Request.Form("refer"), "/")) & "topic.asp?TOPIC_ID=" & TopicNum & vbNewLine
end if
%>
<!--#INCLUDE FILE="inc_mail.asp" -->
<%
end if
Else
rs2.Close
Set rs2 = nothing
End if

end sub



FIX FORUM TITANIUM 3.4.06 - 06


Questo fix Risolve la situazione di un utente bloccato il quale si vede notificare un email al spostamento della propria discussione.
Con questa modifica un utente bloccato, come coerente che sia, non riceve nessuna notifica anche quando tale opzione attivata nel forum.

modificare il file post_info.asp aggiungendo le parti in rosso.


sub DoAutoMoveEmail(TopicNum)
'## Emails Topic Author if Topic Moved.
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.MEMBER_ID," & strMemberTablePrefix & "MEMBERS.M_NAME, " & strMemberTablePrefix & "MEMBERS.M_EMAIL, " & strActivePrefix & "TOPICS.FORUM_ID, " & strActivePrefix & "TOPICS.T_SUBJECT "
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS, " & strActivePrefix & "TOPICS "
strSql = strSql & " WHERE " & strMemberTablePrefix & "MEMBERS.MEMBER_ID = " & strActivePrefix & "TOPICS.T_AUTHOR "
strSql = strSql & " AND " & strActivePrefix & "TOPICS.TOPIC_ID = " & TopicNum
strSql = strSql & " AND " & strMemberTablePrefix & "MEMBERS.M_STATUS <> 0"

set rs2 = my_Conn.Execute (strSql)

If Not rs2.EOF Then

email = rs2("M_EMAIL")
user_name = rs2("M_NAME")
Topic_Title = rs2("T_SUBJECT")
ForumId = rs2("FORUM_ID")
Usernum = rs2("MEMBER_ID")

rs2.close
if lcase(strEmail) = "1" then
strRecipientsName = user_name
strRecipients = email
strSubject = strForumTitle & " - Topic Moved"
strMessage = "Ciao " & user_name & vbNewLine & vbNewLine
strMessage = strMessage & "Il tuo Messaggio su " & strForumTitle & "." & vbNewLine
strMessage = strMessage & "Dal titolo - " & Topic_Title & "." & vbNewLine & vbNewLine

if not(chkForumAccess(ForumID,Usernum,false)) then
strMessage = strMessage & "E' stato rimosso, Se hai qualche domanda in proposito contatta l'Amministratore del forum" & vbNewLine
else
strMessage = strMessage & "E' stata spostata in un nuovo forum, Puoi vederla all'indirizzo " & vbNewLine & Left(Request.Form("refer"), InstrRev(Request.Form("refer"), "/")) & "topic.asp?TOPIC_ID=" & TopicNum & vbNewLine
end if
%>
<!--#INCLUDE FILE="inc_mail.asp" -->
<%
end if
Else
rs2.Close
Set rs2 = nothing
End if

end sub

Zip Platinum Full & Titanium 3.4.06 - 06 Aggiornati








 Firma di Amministratore 

===============
Massimo Farieri
===============
WebMaster of: http://www.snitz.it - http://www.superdeejay.net - E-Mail: superdeejay@superdeejay-TOGLINOSPAM.net

PRIMA DI INSERIRE UNA NUOVA DISCUSSIONE LEGGERE LE REGOLE DEL FORUM.
.: GUIDA & DownLoad SuperDeeJay.Net - Snitz.it Snitz FORUM :. .: REGOLE SuperDeeJay.Net Snitz.it Snitz FORUM:.
.:Il TUO Supporto a Snitz.it Snitz Forum:. -> LEGGIMI! <- Usurpatori frode e ruberia


 Regione Sicilia  ~ Prov.: Siracusa  ~ Citt: Rosolini  ~  Messaggi: 9250  ~  Membro dal: 15/02/2001  ~  Ultima visita: 04/09/2017
  Discussione Precedente Discussione Discussione Successiva  
  Bookmark this Topic  
| Altri..
 
Vai a:

Versione 3.4.07 by Modifichicci - Herniasurgery.it | Distribuito Da: Massimo Farieri - www.snitz.it - Versione Adamantine - Agg.07/11 Powered By: Snitz Forums 2000 Version 3.4.07
Questa pagina stata generata in 0,18 secondi.