Newsgroup: it.comp.os.win.windows10
Titolo: [X-Post] Quotefix per Outlook Express 6.0... o quasi

Dopo questo thread su come installare correttamente Outlook Express 6.0 su win7
e win10:
 
https://groups.google.com/d/msg/it.comp.os.win.windows7/c5xQ_n-O-Hs/Ig416xRpFQAJ
 
 
restava ancora il problema della comodità di avere OE-Quotefix.
 
Mi è  venuta un'idea mentre facevo uno script Vbs usando il modo "sendkeypress"
di NirCmd della NirSoft.
 
NirCmd è un vero e proprio coltellino svizzero che permette di fare cose che con
Vbs sono impossibili a causa dell'impossibilità di usare direttamente le API di
windows.
 
In pratica con NirCmd tra le altre cose è possibile leggere le finestre di
Windows e attivarle come si farebbe con FindWindows(),
GetWindowsText(),EnableWindow(), ecc.
 
Quindi ho realizzato uno scipt che mi sembra funzionare e ho pensato di
condividerlo.
 
La cosa più difficile è stata scrivere il risultato quotato in modo fosse
rispettata la codifica, in modo che le «è» e le «à»  rimanessero tali dopo il
quoting e non diventassero cose come  «¶¿», cosa che con Clip.exe o anche il
cipboard di NirCmd non succedeva.
	___
 
Per usare lo script bisogna scaricare NirCmd.exe (32 o 64 bits) da qui, in fondo
alla pagina:
 
http://www.nirsoft.net/utils/nircmd.html
 
 
salvarlo e metterlo in una cartella.
 
Ora occorre aprire Notepad o un altro editor, copiare il testo dello script tra
le due righe continue facendo attenzione alle interruzioni di linea non volute,
 e sostituire il percorso nello script all'inizio dove dice:
 
 NirCmd_32 = " "
 NirCmd_64 = "  "  ovviamente con il path del vostro pc.
 
Copy File Name è una utility comodissima per ricavare il path:
http://www.bullzip.com/products/cfn/info.php
 
 
Alla fine salvate il file con in nome 'Quotefix.vbs' in una cartella, mettete
poi uno shotcut sul Desktop, magari assegnandogli questa icona:
https://www.dropbox.com/s/82d94uv0byvshv0/OEQuoteFix%20Vbs.ico?dl=0
 
 
Per provarlo potete aprire Outlook Express e rispondere ad una mail, in modo che
sulla finestra compaia un  «Re:  »
 
A quel punto, cliccando sul segnalibro sul Desktop fatto prima a Quotefix la
email verrà quotata.
 
Le email in Html verranno riportate col solo testo quotato, per me che
visualizzo sempre le email in solo testo e rispondo così è un vantaggio, il vero
OE-Quotefix invece mette una riga nera se in Html.
 
"Quotefix.vbs"
_______________________________________________________________
 
'Programma per aggiungere il quoting ">" nella risposta di una email
Const TemporaryFolder = 2 '
 
'Qui sotto aggiornare il path:
  NirCmd_32 = "E:\Apps\Nirsoft\nircmd\nircmd.exe"
  NirCmd_64 = "E:\Apps\Nirsoft\nircmd-x64\nircmd.exe"
 
 Set Fso = CreateObject("Scripting.FileSystemObject")
 Set oShell = CreateObject("Wscript.Shell")
 
   Bits = GetObject("winmgmts:root\cimv2:Win32_Processor='cpu0'").AddressWidth
 
If Bits = 32 Then		'32 bit
  NirCmd = NirCmd_32
Else		'64
  NirCmd = NirCmd_64
End If
 
 If Fso.FileExists(NirCmd) = False Then MsgBox NirCmd & " UnFound", vbCritical,
"FILE ERROR" :Wscript.Quit
 
 If IsRunning("msimn.exe") = False Then MsgBox "OE is not Running",
vbCritical,"ERROR" :Wscript.Quit
 
 
 Cmd = NirCmd & " win activate stitle " & Chr(34) & "Re:" & Chr(34)
	oShell.Run Cmd ,0 , True
 
	Wscript.Sleep	200
 
'Select All
 Cmd = NirCmd & " sendkeypress  ctrl+A "
	oShell.Run Cmd ,0 , True
 
'Clipboard Copy
 Cmd = NirCmd & " sendkeypress  ctrl+C "
	oShell.Run Cmd ,0 , True
 
'Get clipboard text
	Set objHTML = CreateObject("htmlfile")
  Text = objHTML.ParentWindow.ClipboardData.GetData("text")
 
'Errore se non trova un "Re:"
  If IsNull(Text) Then MsgBox  "Text Read Failed", vbCritical :Wscript.Quit
  If Len(Text)= 0 Then MsgBox  "Text Read Failed", vbCritical :Wscript.Quit
 
  Text = Replace (Text, VbCrLf, VbCrLf & ">")
 
'Put the string Text into Clipboard
	SetClipboard Text
 
	Wscript.Sleep	100
 
'Paste Clipboard
 Cmd = NirCmd & " sendkeypress  ctrl+V "
	oShell.Run Cmd ,0 , True
 
'Top
 Cmd = NirCmd & " sendkeypress  ctrl+home "
	oShell.Run Cmd ,0 , True
 
 Cmd = NirCmd & " clipboard clear "
	oShell.Run Cmd ,0 , True
 
 WScript.Quit
 
'*****************************************
'Questa rispetta le lettere accentate nella Clip
Sub SetClipboard(sText)
 Dim sFile, oFile
 
    Set tFolder = fso.GetSpecialFolder(TemporaryFolder)
    sFile = tFolder & "\~SetClipboard.hta"	:   'WScript.Echo sFile
 
  If Not Fso.FileExists(sFile) Then
 
    Set File = Fso.CreateTextFile(sFile, True)
 
    File.WriteLine "<HTA:APPLICATION id=c APPLICATIONNAME=/><SCRIPT
language=VBScript>" _
    & "document.parentwindow.clipboardData.SetData ""text""," _
    &
"Right(C.commandLine,Len(c.commandLine)-InStr(2,c.commandLine,Chr(34))-1):window.close"
_
    & "</SCRIPT></HTA:APPLICATION>"
 
     File.Close : Set File = Nothing
 
  End If
 
	Cmd = sFile & " " & sText
	oShell.Run Cmd ,0 , True
 
End Sub
 
Function IsRunning(Proc)
  Set Processes = GetObject("winmgmts:").InstancesOf("Win32_Process")
    	IsRunning = False
 
	For Each Process In Processes
	    If StrComp(Process.Name, Proc, vbTextCompare) = 0 Then
	    	IsRunning = True: Exit For
	    End If
	Next
End Function
_________________________________________________________
 
Sperando di aver fatto una cosa utile:
 
-- 
ciao
  Stefano

 e win10:
 
A parte l'evidente OT,per quale ragione una persona sana di mente 
dovrebbe volere usare ancora
  quell'aborto?

  quell'aborto?
 
Gentilmente: elenca i newsreader che non danno problemi per almeno dieci 
anni.
 
 
Fabrizio
 
 
 

>>>>  
http://www.bb2002.it
 :)  <<<<<
........... [ al lavoro ] ...........

 restava ancora il problema della comodità di avere OE-Quotefix.
 
mi hai riportato indietro di vent'anni :D

 anni.
 
thunderbird non mi dà particolari problemi,
mesnews è da sempre considerato un ottimo newsreader
 
ma... dipende pure cosa intendi per problemi

 xnews
 
Se non ricordo male, XNews aveva problemi con Unicode
 
Enrico

 
 
yes, avevo provato anche un barbatrucco MIME o sarcattso, senza riuscire a 
ottenere la miglioria, per cui ho rimesso tutto come in origine e vivo 
comunque tranquillo
 
però son ben più di 10 anni che lo uso senza (altri) problemi


 xnews
 
Ho dovuto abbreviare (perche' poi parte il solito flame adolescenziale "ce 
l'ho piu' grosso"), ma sono fior di lustri che dico che OE sara' un cesso, 
ma su di un cesso si deve stare comodi... e cosi' e'.
Non mi pare che ci siano newsreader piu' comodi, immediati, direi pure 
istantanei.
(ma xnews... funziona, su W7? Boh... ci provero')
 
 
Fabrizio
 
 
 
 

 ma xnews... funziona, su W7?
 
eccolo :)
da anni



Pan, ecco...
-- 
--
si sta come si sta / è solo stare

 
 
povero Peter

 ha
scritto:
 
Ho trovato una situazione che crea un errore, anche se non č un vero e proprio
bug.
 
Il fatto č che su XP la lunghezza massima dell'argomento da passare al Command č
di 2048 caratteri, e mi č capitato di rispondere mentre usavo Xp ad una email in
HTML che, anche se non troppo lunga arrivava a quasi 3000.
 
La soluzione č tagliare i caratteri oltre la lunghezza massima, solo in Xp.
 
Per evitare di tediarvi ancora con un messaggio troppo lungo, il nuovo sorgente
l'ho messo qui, cosě chi vuole se lo scarica:
 
https://www.dropbox.com/s/2f8uy4k50s0918o/Quotefix.vbs?dl=0
 
 
 
 
-- 
ciao
  Stefano

 da anni
 
Mi permetti un post collettivo? Non ti do' del "voi", eh!
 
Ci sono, mi pare, 4 o 5 risposte al mio lamento sul voler utilizzare OE su 
W7.
 
Ma mica mi consigliate "tutti" oppure "la maggioranza" un newsreader solo.
 
Macche'.
 
CINQUE DIVERSI NEWSREADER!
 
Vedo che siete tutti concordi... ah no.
 
 
Fabrizio :-P
 
 

 
 
ognuno tira l'acqua al suo mulino: più utenti, più esperienze da 
condividere, più supporto in caso di necessità :)
 
io uso saltuariamente anche mesnews (windows), pan (sia windows che linux), 
il cinese (sul tablet), thunderbird (windows) e provo anche altri, 
specialmente se "portable"


 CINQUE DIVERSI NEWSREADER!
 
Fabrì... è come con gli editor, c'è chi usa UltraEdit, chi usa
Notepad++, chi preferisce VIM, chi invece usa notepad; d'altronde
ognuno ha le proprie preferenze; il problema, nel caso di OE è che si
tratta di un programma che era profondamente "integrato" nell'OS e che
non è più supportato; per cui, anche se esistono dei modi in puro stile
FrankenstIn (AIgor <g>) per "trapiantare" OE sulle versioni recenti di
windows, questo non significa che l'operazione sia consigliabile, anche
perchè eventuali problemi e vulnerabilità del vecchio OE e delle sue
componenti (DLL...) verranno "portati" al nuovo OS, il che, permettimi,
non è il massimo.
 
Considerando che esistono un mucchio di altri client aggiornati e visto
che OE è ormai stato abbandonato da tempo, credo che a questo punto
l'unica giustificazione per continuare ad usarlo sia la pigrizia :-) e,
ok, ci sta anche quella, ma forse sarebbe il caso di fare uno sforzo e
provare a configurare a proprio piacimento un un altro programma ed
imparare ad usarlo e conviverci
 
ciao
 

 Vedo che siete tutti concordi... ah no.
 
trovare sui newsgroup persone concordi è quasi come trovare un ago nella 
cruna del cammello dentro al pagliaio
 
prova e decidi quale è più incline alle tue preferenze

 altro programma ed imparare ad usarlo e conviverci
 
Tanto vale farlo. Ma sospetto gia' che sara' una convivenza forzata e 
piena di piatti che volano. :-P
 
 
Fabrizio
 
 
1) Non sono pochi.
La segreteria telefonica, se attiva, ha massimo tempo di attesa di 60 
secondi. Se non vuoi che si attivi, ma vuoi che serva per i rompiballe 
telefonici che hai messo nell'apposita rubrica che viene deviata in 
segreteria, rischi che innocenti ci finiscano dentro perche' il timeout 
telefonico italiano, e' superiore a 60 secondi. Basterebbe allungare il 
tempo di attivazione. Macche'.
Il "busy on busy" non si attiva singolarmente su ogni cordless FON. 
Modifichi uno, modifichi tutti, checche' ne dica il manuale. ("...devo 
mandare una schermata DI COSA?")
Quindi, se "non" lo attivi, chiunque chiami sul numero VOIP, sentira' 
squillare sempre libero, anche se la persona che risponde e' li' che parla 
con qualcuno. E rischi di prenderti del fancazzista.
Attiviamo il "busy on busy", allora. Se chiami sul numero VOIP, senti il 
sacrosanto occupato.
E cosi' scopri che, mentre il VOIP e' occupato e qualcuno chiama 
sull'altra linea (analogica), il Fritz si comporta da "bambino 
maleducato", facendo un rapido "impegna e riaggancia" la linea telefonica. 
E trovi sul log, una decina di richiamate dello stesso numero. E provi col 
tuo telefono e senti distintamente il clic-clac. E l'assistenza dice che 
e' l'impedenza della linea. Ma dimmi che non hai capito un cazzo e/o non 
vuoi fixare questo problema... e cerchi una scusa (cretina), magari e' 
piu' sincero.
 
 

 non vuoi fixare 
 
no eh, NON ti ci mettere anche tu, PLEASE :P
 

 altri, specialmente se "portable"
 
Non e' che mi viene un colpo apoplettico... semplicemente, faccio come il 
bicchiere troppo pieno.
 
 
Fabrizio :-P
 
 
 

 no eh, NON ti ci mettere anche tu, PLEASE :P
 
Beh, dai: dopo che vedi sdoganato "bootstrappare", ti viene da accettare 
neologismi lievemente meno "orrendi".
 
 
Fabrizio
 
 

 desideri!" :-P
 
Bah, prendila come ti pare; quello che posso dire è che ho iniziato ad
usarlo anni addietro, dopo aver abbandonato FidoLook, ci ho messo un
pochino a personalizzarlo (skin, scorciatoie tastiera, ...) ma tutto
sommato, ad oggi, mi ci trovo bene, poi come succede in molti casi,
ognuno ha le proprie preferenze, e non pretendo di sicuro che si tratti
del programma migliore del mondo; però, di sicuro, lo preferisco a TB
(che *devo* usare in altri ambiti), quantomeno non è elefantiaco :)
 
 
 

 pochino a personalizzarlo (skin, scorciatoie tastiera, ...) 
 
https://en.wikipedia.org/wiki/Claws_Mail#/media/File:Claws-mail_271-en.png
 
 
https://www.claws-mail.org/themes.php?section=downloads
 
 
ciao