Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
String under message window
Message
De
08/06/2008 01:44:52
 
 
À
Tous
Information générale
Forum:
Level Extreme
Catégorie:
Autre
Titre:
String under message window
Divers
Thread ID:
01322355
Message ID:
01322355
Vues:
10
Michel

I'm getting a string below the message.

example below.

Doesn't seem to effect functionality

Nick

% ERROR: LOCAL lcHtml lcHtml='' lcHtml=lcHtml+GenerateXPStyleFolderAlignment(1) RETURN lcHtml % > < % ERROR: LOCAL lcHtml,lnLength,lnActual lnLength=4 IF glSysop lnLength=9 IF llUnmarkSysop lnLength=lnLength+1 ENDIF IF NOT llSolutionSysop lnLength=lnLength+1 ENDIF ENDIF LOCAL ARRAY laMenu[lnLength,2] IF glAutoLink laMenu[1,1]=GetMes('Personal','NoAutoLink') ELSE laMenu[1,1]=GetMes('Personal','AutoLink') ENDIF laMenu[1,2]='javascript:SaveOption("3,'+ALLTRIM(STR(Thread.Numero))+'")' IF glAcronym laMenu[2,1]=GetMes('Personal','NoAcronym') ELSE laMenu[2,1]=GetMes('Personal','Acronym') ENDIF laMenu[2,2]='javascript:SaveOption("4,'+ALLTRIM(STR(Thread.Numero))+'")' IF NOT glMessHeader laMenu[3,1]=GetMes('Personal','NoHeader') ELSE laMenu[3,1]=GetMes('Personal','NoHeaderOff') ENDIF laMenu[3,2]='javascript:SaveOption("10,'+ALLTRIM(STR(Thread.Numero))+'")' IF Member.Reply=0 laMenu[4,1]=GetMes('Personal','AutoReply') ELSE laMenu[4,1]=GetMes('Personal','NoAutoReply') ENDIFS laMenu[4,2]='javascript:SaveOption("11")' lnActual=4 IF glSysop lnActual=lnActual+1 laMenu[lnActual,1]='Move this thread...' laMenu[lnActual,2]='javascript:AssignationForum()' lnActual=lnActual+1 laMenu[lnActual,1]='Update the title of this thread...' laMenu[lnActual,2]=gcCgi+'2,2,40,'+ALLTRIM(STR(Thread.NoThread)) lnActual=lnActual+1 laMenu[lnActual,1]='Remove this message...' laMenu[lnActual,2]='javascript:RemoveMessage('+ALLTRIM(STR(Thread.Numero))+')' lnActual=lnActual+1 IF NOT FOUND('Sensitive') laMenu[lnActual,1]='Mark this message sensitive' laMenu[lnActual,2]=gcCgi+'2,2,8,'+ALLTRIM(STR(Thread.Numero)) ELSE laMenu[lnActual,1]='Unmark this message sensitive' laMenu[lnActual,2]=gcCgi+'2,2,9,'+ALLTRIM(STR(Thread.Numero)) ENDIF lnActual=lnActual+1 IF NOT FOUND('Freeze') laMenu[lnActual,1]='Freeze this thread' laMenu[lnActual,2]=gcCgi+'2,2,6,'+ALLTRIM(STR(Thread.NoThread))+','+ALLTRIM(STR(Thread.Numero)) ELSE laMenu[lnActual,1]='Unfreeze this thread' laMenu[lnActual,2]=gcCgi+'2,2,7,'+ALLTRIM(STR(Thread.NoThread))+','+ALLTRIM(STR(Thread.Numero)) ENDIF IF llUnmarkSysop lnActual=lnActual+1 laMenu[lnActual,1]='Unmark this message for points' laMenu[lnActual,2]=gcCgi+'2,2,25,'+ALLTRIM(STR(Thread.NoThread))+','+ALLTRIM(STR(Thread.Numero)) ENDIF IF NOT llSolutionSysop lnActual=lnActual+1 laMenu[lnActual,1]='Mark this message as a solution' laMenu[lnActual,2]=gcCgi+'2,2,41,'+ALLTRIM(STR(Thread.NoThread))+','+ALLTRIM(STR(Thread.Numero)) ENDIF ENDIF lcHtml='' lcHtml=lcHtml+GenerateDynamicMenu(@laMenu,.T.,,.T.,.T.,.T.,,'1,'+ALLTRIM(STR(Thread.Numero))) RETURN lcHtml % >
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform