[VBA - Access] Errore in App.Path {era: "VB6"}

[FraChiara]

Ragazzi, nel seguente pezzo di codice

Set objWord = New Word.Application
Set objdoc = objWord.Documents.Add
objdoc.Activate
Set objdoc=objWord.Documents.Open(App.Path & "\" & file)

l'ultima istruzione mi crea il seguente errore: "Necessario oggetto"

Mi sapete dire perchè? Se tolgo App.Path e scrivo l'indirizzo normale ("C:\......") l'errore non esce, solo che io non voglio scrivere tutto l'indirizzo.

Thanks

[Brainjar]

Controlla quanti backslash \ hai in App.Path & "\" & file inserendo
questa istruzione :

Set objWord = New Word.Application 

Set objdoc = objWord.Documents.Add 
objdoc.Activate 
          Debug.Print App.Path & "\" & file '<-- inserisci questa istruzione 
Set objdoc=objWord.Documents.Open(App.Path & "\" & file)

Se contiene \\, ovvero due backslash, potresti risolvere il tutto
facendo un controllo sul valore ritornato da app.path

Set objWord = New Word.Application 
Set objdoc = objWord.Documents.Add 
objdoc.Activate 
If right$(App.Path,1) = "\" then 
    Set objdoc=objWord.Documents.Open(App.Path & file) 
Else
    Set objdoc=objWord.Documents.Open(App.Path & "\" & file) 
End If

Ciao,

[FraChiara]

Purtroppo lo stesso errore ora esce sull'istruzione

Debug.Print App.Path & "\" & file

E' come se non volesse proprio app.path

[Brainjar]

Sei sicura che non vuole 'file', nel senso che non l'hai dichiarato ?
O che è vuoto?
Prova con Debug.Print file e vedi se ti da errore lo stesso.
App.Path è parte di VB60 è strano che dia errore.

Ciao,

[alka]

Ciao FraChiara,
ho notato che usi titoli molto generici per le tue discussioni; se tu utilizzi titoli più specifici che lascino intravedere l'argomento della discussione, otterresti maggiore visibilità e quindi possibilità di ricevere una risposta.

In questo modo, inoltre, costringi gli utenti ad aprire il tuo messaggio per sapere di cosa parla.

Spero di averti dato validi suggerimenti per un uso più corretto del forum.

Ciao!

[FraChiara]

L'ho fatto e 'file' risulta pieno.
Mi sono accorta, pero' che App.Path risulta essere vuoto.
Io sto lavorando in access, puo' essere per questo?

[FraChiara]

ok, grazie per il consiglio!!!!

[Brainjar]

E' probabilmente questo.
Avevi intitolato 'VB60' tra l'altro.
Prova a vedere tra le propriètà dell'oggetto Application se
c'è una che equivale a 'path'.

Ciao,