Yes i will. Let's see if i have it on my thump drive... if not then tomorrow.
It's a simple VBS which do
sendkeys F3
sendkeys Ctrl+Shift+T
sendkeys DEL
Before executing the script
i have downloaded an HTML file
and did a search for "<scri" in it
to have smtg for F3 "search again"..
Then i go two, three line up
and execute the script which should:
1) search again the <script> TAG by pressing F3
2) execute the short cut Ctrl+Shift+T to select the hole TAG
<script>+++</script>
3) pressing DEL to delete all selected TAG
Problem: chars are deleted at the three lines above
where i have placed the cursor
instead of the selected find position "<scri"
.
-
OH i found it, i send it you by mail:
Const module_name = "StS2007FindAgainAndDelete"
Const module_ver = "0.01"
Sub Init
addMenuItem "Find again, press C+S+T and DEL" , "", "DOIT", "Alt+F3"
End Sub
Sub DOIT
Set SH = Wscript.CreateObject("WScript.Shell")
Set editor = newEditor()
editor.assignActiveEditor
' first do an search on your own like: Find "<script"
' second go one or more lines up
' third execute this script:
SH.SendKeys "{F3}"
Sleep(1000)
SH.SendKeys "^+t"
Sleep(1000)
SH.SendKeys "XXXX" '{Del}"
End Sub
--
<http://forum.pspad.com/read.php?4,41953,42039>
PSPad freeware editor http://www.pspad.com
