Boa noite Pessoal
Estou com problemas para criar um link.
Eu tenho um DB que possui uma form Application_Base_Data, como esse banco de dados eu estou instalando em vários computadores cada usuário quer deixá-lo em pastas diferentes.
Então criei um form onde ele salva o caminho do form Application_Base_Data , que chamei de File_Path
Dentro do Application_Base_Data , tenho vários pdf ex: MT-0001.pdf, MT-0002.pdf e assim por diante, cada um é um projeto, no campo que chamei de File_No somente escrevo o número, para abrir ele automaticamente como eu importei ele veio com o hyperlink http:\\0001.pdf por exemplo, já tentei de todas as formas montar a seguinte lógica, ao clicar no campo File_No em outro form chamado Application, mas ele só funciona se eu colocar manualmente o hiperlink.
O File_Path é C:\Documents\M\MML Aplications\PDF , eu criei rotina através de exemplos para tentar resolver como abaixo:
Private Sub File_No_Click()
Application.FollowHyperlink "C:\Documents\M\MML Aplications\PDF\MT-0001.pdf " (para teste, funcionou perfeitamente)
End Sub
Ai criei o seguinte código
Private Sub File_No_Click()
Application.FollowHyperlink ("C:\Documents\M\MML Aplications\PDF\MT" & Me.File_No.Value & ".pdf")
End Sub
Também tentei
Private Sub File_No_Click()
Dim strInput As String
strInput = Forms![Application_Base_Data]![File_No]
Application.FollowHyperlink ""C:\Documents\M\MML Aplications\PDF\" &strInput
End Sub
Também não deu certo
Se alguém puder me ajudar
Estou com problemas para criar um link.
Eu tenho um DB que possui uma form Application_Base_Data, como esse banco de dados eu estou instalando em vários computadores cada usuário quer deixá-lo em pastas diferentes.
Então criei um form onde ele salva o caminho do form Application_Base_Data , que chamei de File_Path
Dentro do Application_Base_Data , tenho vários pdf ex: MT-0001.pdf, MT-0002.pdf e assim por diante, cada um é um projeto, no campo que chamei de File_No somente escrevo o número, para abrir ele automaticamente como eu importei ele veio com o hyperlink http:\\0001.pdf por exemplo, já tentei de todas as formas montar a seguinte lógica, ao clicar no campo File_No em outro form chamado Application, mas ele só funciona se eu colocar manualmente o hiperlink.
O File_Path é C:\Documents\M\MML Aplications\PDF , eu criei rotina através de exemplos para tentar resolver como abaixo:
Private Sub File_No_Click()
Application.FollowHyperlink "C:\Documents\M\MML Aplications\PDF\MT-0001.pdf " (para teste, funcionou perfeitamente)
End Sub
Ai criei o seguinte código
Private Sub File_No_Click()
Application.FollowHyperlink ("C:\Documents\M\MML Aplications\PDF\MT" & Me.File_No.Value & ".pdf")
End Sub
Também tentei
Private Sub File_No_Click()
Dim strInput As String
strInput = Forms![Application_Base_Data]![File_No]
Application.FollowHyperlink ""C:\Documents\M\MML Aplications\PDF\" &strInput
End Sub
Também não deu certo
Se alguém puder me ajudar