[Risolto] Macro apre file esterno

[sgruntolino]

Ciao ho un problema...o non scriverei
ho un form con due campi URL con 2 pulsanti associati per aprire in 2 cartelle diverse 2 file, un pdf e un odt prendendo esempio da file Vladko che ho allegato di nuovo.
il primo funziona perfettamente, il secondo mi da errore: PROPRIETA' O METODO NON TROVATI: TEXT
Essendo le 2 macro uguali non riesco a capire, ho fatto diverse prove ma nulla, lo stesso errore, mi potete dare una dritta?
Grazie

esempio preso da link Vladko

macro perfettamente funzionante

Codice: Seleziona tutto

function openurlimm(oEv as object)
' 
   dim oForm,oComboBox
   oForm=oEv.source.model.parent
   oComboBox=oForm.getbyname("Immagine")
   if FileExists ( oComboBox.text) then
      oEv.source.model.targeturl=oComboBox.text
      openurlimm=true ' Do the programm when the file exists
      else 
      openurlimm=false ' The file does not exist and do nothing
   end if
   'print  convertfromurl(oTextBox.text)
End function

stessa macro abbinata a altro pulsante e altro campo di testo, vanno in conflitto? Non riesco a capire nei 2 campi URL e' uguale, ovviamente con diverso indirizzo, cmq nel dare OK su errore poi mi apre il file

Codice: Seleziona tutto

function openurlrep(oEv as object)
' 
   dim oForm,oComboBox
   oForm=oEv.source.model.parent
   oComboBox=oForm.getbyname("Report")
   if FileExists ( oComboBox.text) then
      oEv.source.model.targeturl=oComboBox.text
      openurlrep=true ' Do the programm when the file exists
      else 
      openurlrep=false ' The file does not exist and do nothing
   end if
   'print  convertfromurl(oTextBox.text)
End function

[codicem]

Prova con il db allegato e macro modificata e vedi se va bene.

[sgruntolino]

si va bene e ho trovato anche che il risultato della macro non puo' avere lo stesso nome del campo di testo o da errore.

Grazie