Ответ

G100m 12.12.2005 18:59 / 12.12.2005 18:59

Dim objArgs, objSh, s, cmd, parts, coords, file, line, col

Set objArgs = WScript.Arguments
Set objSh = CreateObject("WScript.Shell")
s = Mid( objArgs(0), 8 )

parts = Split(s, "?", 2)
file = parts(0)
lineCol = parts(1)

coords = Split(lineCol, ":")
line = coords(0)
col = coords(1)

cmd = "uestudio.exe " & file & "/" & line & "/" & col

errReturn = objSh.Run (cmd, 1, false)

+ конечно, убрать галку с "allow multiple instances" в configuration > general

---