<http://forum.pspad.com/read.php?f=2&i=10512&t=10507>
----------------------------------------------------------------
I appreciate your suggestions but I am calling a function in my ActiveX and
so the VBScript does not continue to execute until call flow is returned to
the script.
Here is my script. Since a form within the ActiveX is displayed I need to
know how to make it display in front of PSPad instead of behind. Any
ideas?
Sub GetLogFile()
Dim oEXE
Dim sTime, sFile, sFilePath
Dim PSPadEditor, PSPadNewEditor
Set PSPadEditor = newEditor()
If PSPadEditor.assignActiveEditor() Then
sTime = PSPadEditor.selText()
sFilePath = PSPadEditor.fileName()
Set oEXE = CreateObject("CustomVBScripts.Routines")
sInfo = "FILEPATH:" & Replace(sFilePath,":","@COLON@") & "|TS:"
& Replace(sTime,":","@COLON@")
sFilePath = oEXE.GetLogFile(sInfo)
If Len(sFilePath) > 0 Then
Set PSPadNewEditor = newEditor()
PSPadNewEditor.openFile(sFilePath)
End If
Set oEXE = Nothing
Set PSPadNewEditor = Nothing
End If
Set PSPadEditor = Nothing
End Sub
[%sig%]
--
PSPad freeware editor http://www.pspad.com