OpenOffice.info

[quote]
SUB FileControl_auswerten
init%=1 then exit sub

Datei$=MDB_Dlg.getControl("FileControl").text
Programm$="C:\Programme\Internet Explorer\IEXPLORE.EXE "
Befehl$= Programm$ & Datei$
SHELL (Befehl$)
END SUB
[/quote]

Der kpl. Pfad wird benötigt, dann geht es doch!
Der Explorer ruft dann abhängig von der Datei automatisch den entsprechenden Viewer auf, z.B. bei PDF.

Noch nicht perfekt, aber es geht schon mal...

Oktobaer

SUB FileControl_auswerten
	if init%=1 then exit sub
	
		Datei$=MDB_Dlg.getControl("FileControl").text
		Programm$="iexplore.exe "
		Befehl$= Programm$ & Datei$
		SHELL Befehl$
END SUB

Hallo Ihr!

Lese via FileControl ein DateiNamen ein und möchte diesen in einem Viewer anzeigen lassen.
In VBA ging das durch Aufruf des Internet Explorer mit dem FileNamen als Anhang.

[code]
SUB FileControl_auswerten
if init%=1 then exit sub

Datei$=MDB_Dlg.getControl("FileControl").text
Programm$="iexplore.exe "
Befehl$= Programm$ & Datei$
SHELL Befehl$
END SUB
[/code]

So einfach geht es natürlich nicht...

Habt Ihr eine Idee?

OktoBaer

PS.: Als DateiTypen sollen gehen: PDF, übliche Grafiken, HTML, OpenOffice-Files