Kramer
Gebruiker
- Lid geworden
- 12 jun 2002
- Berichten
- 447
Wij hebben in onze organisatie een werkbalk gemaakt waarmee je bepaalde sjablonen kan oproepen van je afdeling. Met Win95 en Word97 hebben we geen problemen. Maar in combinatie met WinXp en Win2000 geeft de zelfde macro steeds deze melding:
U hebt geen toegang tot de map (map op het netwerk die verwijst naar de afdeling bij wie je je hebt aangemeld) \*.*. Raadpleeg de beheerder voor toegang tot deze map.
Dit is de macro die wij gebruiken:
(dit is het gedeelte waar hij fout gaat)
ChangeFileOpenDirectory (locatie + "\" + rubriek)
Set haalfile = Dialogs(wdDialogFileOpen)
With Dialogs(wdDialogFileOpen)
.Name = "*.*"
bclicked = .Display
resultaat = .Name
If bclicked = 0 Then 'annuleer
Rubriek is een string die uit een bestandje haalt naar welke map (afdeling) hij moet openen op het netwerk.
Veranderen we bij .Name="*.*"naar bijvoorbeeld naar ".doc" werkt hij wel. Maar hij moet echt verwijzen naar "*.*". Dit omdat wij meerdere exetensies gebruiken.
Alvast iedereen bedankt voor het meedenken.
U hebt geen toegang tot de map (map op het netwerk die verwijst naar de afdeling bij wie je je hebt aangemeld) \*.*. Raadpleeg de beheerder voor toegang tot deze map.
Dit is de macro die wij gebruiken:
(dit is het gedeelte waar hij fout gaat)
ChangeFileOpenDirectory (locatie + "\" + rubriek)
Set haalfile = Dialogs(wdDialogFileOpen)
With Dialogs(wdDialogFileOpen)
.Name = "*.*"
bclicked = .Display
resultaat = .Name
If bclicked = 0 Then 'annuleer
Rubriek is een string die uit een bestandje haalt naar welke map (afdeling) hij moet openen op het netwerk.
Veranderen we bij .Name="*.*"naar bijvoorbeeld naar ".doc" werkt hij wel. Maar hij moet echt verwijzen naar "*.*". Dit omdat wij meerdere exetensies gebruiken.
Alvast iedereen bedankt voor het meedenken.
