[Access/VBA] Word document openen (if exist)

[Verwijderd]

Vanuit Access wil ik een bepaald Word document openen.
In Access wordt de naam van het document bepaald en opgeslagen in een string.

Nu wil ik het Word document 'Test.doc" openen

code:

soort = "test"
Set objX = GetObject("", "Word.Application")
objX.Application.Visible = True

Set wordDoc = objX.Documents.Open("c:\test\" + soort + ".doc")

Dat gaat prima

Nu kan het voorkomen dat het Word document niet bestaat (soort bevat een ongeldige worddocument). Nu heb ik de functie .

code:

file exist

gevonden.
Maar na flink met deze aan de slag te zijn geweest, lukt dit niet.

code:

Set fs = Application.FileSearch
With fs
.LookIn = "C:\test"             'dir
.fileName = "*.doc"            ' file type

Nu vond ik in de help van access bovenstaande functie...maar ik weet niet hoe ik nu kan bepalen of het file excist of niet.
Iemand een suggestie om me weer op weg te helpen?

[BertS]

Een file bestaat als

code:

Len(Dir("C:\temp.txt"))>0

[Verwijderd]

Thx, ik ga vanavond meteen even proberen!
Het zal nog wel wat rommellen worden met de juiste syntax, maar dat zal vast wel lukken

[BtM909]

Wat je ook kan doen is je error-handling uitbreiden en checken op de error die je krijgt als het bestand niet bestaat

[BertS]

BtM909 schreef op donderdag 07 juli 2005 @ 15:47:
Wat je ook kan doen is je error-handling uitbreiden en checken op de error die je krijgt als het bestand niet bestaat