Hallo zusammen,
ich arbeite mit folgendem script:
theView = av.GetActiveDoc
found = FALSE
p = theView.GetDisplay.ReturnUserPoint
thedpy = theView.GetDisplay
t = theView.GetActiveThemes.get(0)
if (t.is(ftheme)) then
t.SelectbyPoint(theDpy.GetMouseLoc, #VTAB_SELTYPE_NEW)
v = t.GetFTab
linkField = t.getHotField
if (linkField = nil) then
system.beep
msgbox.error("Hot link theme properties are not set for this theme.","")
av.run("view.clearselect","")
exit
else
FOR each rec in v.GetSelection
stringvalue = v.ReturnValueString(LinkField, rec)
if (stringvalue = "") then
system.beep
msgbox.error("This feature does not have a designated hot-link.","")
av.run("view.clearselect","")
exit
else
intHandle = DLL.GetAVWindowHandle
dllName = filename.findinsystemsearchPath("shell32.dll")
u32DLL = DLL.Make(dllName)
OpenFile=DLLProc.Make(u32DLL, "ShellExecuteA", #DLLPROC_TYPE_INT32,
{#DLLPROC_TYPE_INT32, #DLLPROC_TYPE_STR, #DLLPROC_TYPE_STR,
#DLLPROC_TYPE_STR, #DLLPROC_TYPE_STR, #DLLPROC_TYPE_INT32})
result = OpenFile.call({intHandle, "open", stringvalue, "", "C:\\", 1})
if (result = 2) then
system.beep
msgbox.error("The hot-link file specified for this feature was not found.","")
exit
end
end
end
end
end
Wenn ich damit einen hotlink zu einer Excel Datei erzeuge, dann wird zwar Excel gestartet aber die eigentliche Datei wird nicht geladen. Woran kann das liegen?
MfG
roland
ich arbeite mit folgendem script:
theView = av.GetActiveDoc
found = FALSE
p = theView.GetDisplay.ReturnUserPoint
thedpy = theView.GetDisplay
t = theView.GetActiveThemes.get(0)
if (t.is(ftheme)) then
t.SelectbyPoint(theDpy.GetMouseLoc, #VTAB_SELTYPE_NEW)
v = t.GetFTab
linkField = t.getHotField
if (linkField = nil) then
system.beep
msgbox.error("Hot link theme properties are not set for this theme.","")
av.run("view.clearselect","")
exit
else
FOR each rec in v.GetSelection
stringvalue = v.ReturnValueString(LinkField, rec)
if (stringvalue = "") then
system.beep
msgbox.error("This feature does not have a designated hot-link.","")
av.run("view.clearselect","")
exit
else
intHandle = DLL.GetAVWindowHandle
dllName = filename.findinsystemsearchPath("shell32.dll")
u32DLL = DLL.Make(dllName)
OpenFile=DLLProc.Make(u32DLL, "ShellExecuteA", #DLLPROC_TYPE_INT32,
{#DLLPROC_TYPE_INT32, #DLLPROC_TYPE_STR, #DLLPROC_TYPE_STR,
#DLLPROC_TYPE_STR, #DLLPROC_TYPE_STR, #DLLPROC_TYPE_INT32})
result = OpenFile.call({intHandle, "open", stringvalue, "", "C:\\", 1})
if (result = 2) then
system.beep
msgbox.error("The hot-link file specified for this feature was not found.","")
exit
end
end
end
end
end
Wenn ich damit einen hotlink zu einer Excel Datei erzeuge, dann wird zwar Excel gestartet aber die eigentliche Datei wird nicht geladen. Woran kann das liegen?
MfG
roland
- Anmelden oder Registieren, um Kommentare verfassen zu können
Gespeichert von Jörg Thomsen am Mo., 21.06.2004 - 14:49
Permalinkeine der Fehlermeldungen aus dem Script wird nicht angezeigt?
Spontane Vermutung: Leerzeichen im Pfad zur Excel-Datei.
Lass Dir doch mal StringValue anzeigen, vielleicht hilft das weiter.
Welchen Wert hat 'result?
Jörg
Gespeichert von Gast am Mo., 21.06.2004 - 15:53
Permalinkes scheint ein wenig verhext. Bei einigen Excel Tabellen funktioniert es. Ich habe aber das Gefühl je komplexer sie werden desto weniger ist es praktikabel. Gibt es vielleicht eine Grenze nur vier Tabellenblätter oder so was ähnliches?
Gruss
roland
Gespeichert von Heinz am Di., 29.06.2004 - 15:31
Permalinkhttp://webgis.dyndns.org:8080/giswiki/Wiki.jsp?page=HotlinksArcViewWor d
Grüße Heinz
Gespeichert von Gast am Di., 29.06.2004 - 15:55
Permalinkhast Du noch einen anderen Link.
Dieser führt bei mir zu nichts!
Gruss
roland
Gespeichert von Heinz am Mi., 30.06.2004 - 10:01
PermalinkGrüße Heinz
Gespeichert von Heinz am Mi., 30.06.2004 - 10:03
Permalinkbei mir schon .
ansonsten schau mal hier http://www.giswiki.de
gruß heinz