OpenOffice.info

Verfasst: **So, 08.02.2009 18:05**

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: Alles auswählen

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

So einfach geht es natürlich nicht...

Habt Ihr eine Idee?

OktoBaer

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

Verfasst: **So, 08.02.2009 18:37**

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

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

OpenOffice.info

Dokument Viewer

Dokument Viewer

Re: Dokument Viewer