- Код: выделить все
; Auto HTML Save
; (c) Ergo (mik's edition) - 2003
; special for Opera and Bred2
local clp, fName = "&(pprofolder)clip\html\&(shortdate)-&(time).html"
clip.clear
clip.copy
; удаляем запрещённые символы и переводы строки для имени файла (вернее заменяет на пробел)
clp = ReplaceChars(clip.get, "\/:*?'"<>|#'n'r ")
if (clp != "") do
fName = "&(pprofolder)clip\html\&(clp).html"
endif
; для IE: Keys %vc
Keys ^{f3}
; для Notepad: Wait ready "* - Блокнот*"
Wait ready "*-BRED2*"
Keys ^a
clip.clear
clip.copy
clip.tofile(fName)
*Keys {esc}
; если файл существует и не пустой(есть глюк такой, пустой файл остаётся) выдаём звук
if ((file.size(fName) != "") and (file.size(fName) != 0)) do
"D:\Program Files\PowerPro\sounds\pok3.wav"
endif
тот же скрипт, только при выделении куска текста на странице сохраняет её с этим именем... + в конце проверяет правильность сохранения...
ууууу, прёт меня ж)
<span style='font-size:7pt;line-height:100%'>--------------------
<span style='color:#339'><span style='font-family:verdana'>np Winamp: MTV <!--emo&:)-->
<!--endemo-->, 000 kbps</span></span></span>