Forum Replies Created
- Posts
use a marco to do it!
#language = "VBScript"
'############################################################
'* Name: Open This File V1.0 For EmEditor Pro v6 Marco
'* Date: 2007-11-28
'############################################################
On Error Resume Next
sText = document.selection.Text
If Len(sText)=0 Then
'Check if is ASP's INCLUDE FILE
xPos = document.selection.GetActivePointX(eePosLogical)
yPos = document.selection.GetActivePointY(eePosLogical)
document.selection.SelectLine
sText = document.selection.Text
Set regEx = New RegExp
regEx.Pattern = "<!--s*#INCLUDEs*FILEs*=s*""(.+)""s*-->"
regEx.IgnoreCase = True
If regEx.Test(sText) Then sText=regEx.Replace(sText,"$1")
sText=Replace(sText,vbCrLf,"")
sText=Replace(sText,vbCr,"")
sText=Replace(sText,vbLf,"")
document.selection.SetActivePoint eePosLogical, xPos, yPos
Set fso = CreateObject("Scripting.FileSystemObject")
fPath = Left(document.FullName,InstrRev(document.FullName,""))
sText = fPath & Replace(sText,"/","")
If fso.FileExists(sText) Then editor.OpenFile sText,0,eeOpenAllowNewWindow
Set fso=Nothing
Set regEx=Nothing
Else
'Check if is local hard disk address (C:abc1.txt) or network address (abc1.txt)
Set fso = CreateObject("Scripting.FileSystemObject")
Set regEx = New RegExp
regEx.Pattern = "^(?:[A-Z]:|\)[^s]"
regEx.IgnoreCase = True
If regEx.Test(sText) Then
'absolute address
If fso.FileExists(sText) Then editor.OpenFile sText,0,eeOpenAllowNewWindow
Else
'relative address
fPath = Left(document.FullName,InstrRev(document.FullName,""))
sText = fPath & Replace(sText,"/","")
If fso.FileExists(sText) Then editor.OpenFile sText,0,eeOpenAllowNewWindow
End If
Set fso=Nothing
Set regEx=Nothing
End If
How about give user an option to turn the “Save” command always enabled ?
Currently, EmEditor cannot “Save” a document while the document is “Empty” and without any changed (Just used the “New” command or just clicked EmEditor’s shortcut from Start Menu) .
However , The Windows NotePad can “Save” anytime I want !
[beta28] It happened again, when I edited only 3 asp files !
I right-clicked on the document’s tab button shown the popup menu that “Save” command was enabled, but the main toolbar’s “Save” icon and the main menu’s “Save” command were still disabled !
I think it may be on your source code somewhere forget to refresh the main toolbar and main menu, when the documents’ tab button shows a * mark.
Sometimes it happened after I dragdrop a file to EmEditor , then i click the tab button to switch to other document and edit .
I think that should update the * mark and the toolbar’s “Save” button or menus’ “Save” commands together to fix it.
You may check out your Emeditor’s source code around updating the document’s caption of the * mark , to add some code to update the toolbar and menu.
It happened again!
When I open many asp files with EmEditor (I used about 1~2 hours) and many other programs: Excel 2003, Access 2003, IIS Manager, UEStudio, MyIE Browser .I’am not sure when to happen!
Last time happened, I remembered , when I edit some BAT files for many hours , and use the Virtual PC to run those BAT files again and again .
That may use a “CutStr” function to solve the problem!
vbscript sample code:
Function CutStr(byVal Str,byVal StrLen)
Dim l,t,c,i
l=Len(str)
t=0
For i=1 To l
c=AscW(Mid(str,i,1))
If c255 Then t=t+2 Else t=t+1
IF t>=StrLen Then
CutStr=left(Str,i)&”…”
Exit For
Else
CutStr=Str
End If
Next
End Function7.0 beta 10
there are 2 ways to be fixed:
hello_world (leave the whole word)
or split to :
hello
worldthe 1st way is recommanded,because many program langauges use _ as a validate identifier.
Python for example(from Emeditor’s template.py):
def HelloWorld():
print “Hello World!”if __name__==”__main__”:
HelloWorld()
