PATH NOT FOUND [ô]76[ô]

ROBSONSLZ 02/09/2015 09:13:24
#450864
Oi pessoal...

Alguem tem algumas ideias sobre este erro?
#Imprimir nome e foto com o active report 2.0

Run-Time error [ô]76[ô]

Path not found: [ô]\Fotos\Ana.jpg[ô]
[ô]---------------------------------------
Private Sub ActiveReport_FetchData(EOF As Boolean)

If EOF = False Then

Set Image1.Picture = LoadPicture(DataControl1.Recordset!FotoCont)

End If

End Sub
[ô]----------------------------------------
Private Sub CmdImprimir_Click()

Set ActiveReport1.PageHeader.Controls([Ô]Image1[Ô]).Picture = LoadPicture(App.Path & [Ô]\fotos\logo.jpg[Ô])

ActiveReport1.Show

End Sub

#Obs: As fotos estão gravada no DB (access)
na posição correto: \Fotos\Ana.jpg e mais 3 fotos.

Grato,
TUNUSAT 02/09/2015 10:42:12
#450872
ROBSONSLZ,

A mensagem de erro está dizendo que o caminho não existe:
- [Ô]Path not found: [ô]\Fotos\Ana.jpg[ô][Ô]

==============================================================================
[RESOLVED] Run-time error [ô]76[ô]: Path Not Found
http://www.vbforums.com/showthread.php?509453-RESOLVED-Run-time-error-76-Path-Not-Found
==============================================================================

Não entendi ... a foto está gravada no banco ou neste diretório?

[][ô]s,
Tunusat.
ROBSONSLZ 02/09/2015 10:45:20
#450873
Citação:

:
ROBSONSLZ,

A mensagem de erro está dizendo que o caminho não existe:
- [Ô]Path not found: [ô]FotosAna.jpg[ô][Ô]

==============================================================================
[RESOLVED] Run-time error [ô]76[ô]: Path Not Found
http://www.vbforums.com/showthread.php?509453-RESOLVED-Run-time-error-76-Path-Not-Found
==============================================================================

Não entendi ... a foto está gravada no banco ou neste diretório?

[][ô]s,
Tunusat.



As fotos esta na pasta (fotos) e o caminho das fotos gravada no banco de dados.
TUNUSAT 02/09/2015 11:28:37
#450878
ROBSONSLZ,

O programa não está encontrando o caminho...

O [Ô]Image Picture[Ô] está conseguindo carregar a imagem?

Exemplo:
Image1.Picture = LoadPicture(App.Path & [Ô]\fotos\Ana.jpg[Ô])

[][ô]s,
Tunusat.
ROBSONSLZ 02/09/2015 11:59:03
#450883
Citação:

:
ROBSONSLZ,

O programa não está encontrando o caminho...

O [Ô]Image Picture[Ô] está conseguindo carregar a imagem?

Exemplo:
Image1.Picture = LoadPicture(App.Path & [Ô] otosAna.jpg[Ô])

[][ô]s,
Tunusat.



O imagem picture não consegue carregar a imagem.
TUNUSAT 02/09/2015 14:09:17
#450895
ROBSONSLZ,

Tem certeza que a imagem está na pasta correta?
O [Ô]app.Path[Ô] pode estar retornando outra pasta...

Experimente baixar este exemplo e rodar:
=================================================
LOADPICTURE PARA IMAGENS DE 32 BITS DE CORES
http://www.vbmania.com.br/index.php?modulo=detalhe&id=7873
=================================================

Leia também:
=================================================
PictureBox and Image Controls in Visual Basic 6
http://visualbasic.freetutes.com/learn-vb6/picturebox-image-controls.html
=================================================

[][ô]s,
Tunusat.
ROBSONSLZ 03/09/2015 00:56:52
#450929
Citação:

:
ROBSONSLZ,

Tem certeza que a imagem está na pasta correta?
O [Ô]app.Path[Ô] pode estar retornando outra pasta...

Experimente baixar este exemplo e rodar:
=================================================
LOADPICTURE PARA IMAGENS DE 32 BITS DE CORES
http://www.vbmania.com.br/index.php?modulo=detalhe&id=7873
=================================================

Leia também:
=================================================
PictureBox and Image Controls in Visual Basic 6
http://visualbasic.freetutes.com/learn-vb6/picturebox-image-controls.html
=================================================

[][ô]s,
Tunusat.



#TunuSAT,

Ver o exemplo em anexo sobre imagem no relatório (active report 2.0) tente compreender o Path 76.
TUNUSAT 03/09/2015 09:36:31
#450945 Resposta escolhida
ROBSONSLZ,

Dei uma olhada e ... realmente o problema está no [Ô]ActiveReport[Ô].
Infelizmente não tenho o [Ô]ActiveReport[Ô] nesta máquina... e também usei muito mais o [Ô]Crystal[Ô]...

---------------------------
Microsoft Visual Basic
---------------------------
Errors during load. Refer to [ô]C:\Teste\Exemplo\ActiveReport1.log[ô] for details
---------------------------
OK Ajuda
---------------------------

Estava o olhando o conteúdo das variáveis:

[Ô]- Aqui sai correto:[Ô]
Private Sub CmdReport1_Click()
   Set ActiveReport1.PageHeader.Controls([Ô]Image2[Ô]).Picture = LoadPicture(App.Path & [Ô]\Fotos\logo.jpg[Ô])
   ActiveReport1.Show
End Sub


[Ô]- Aqui sai com erro: (Este é o preferencial)[Ô]
Private Sub CmdReport2_Click()
   Set ActiveReport2.PageHeader.Controls([Ô]Image2[Ô]).Picture = LoadPicture(App.Path & [Ô]\Fotos\logo.jpg[Ô])
   ActiveReport2.Show
End Sub


Dentro do [Ô]Imediate[Ô]:
? App.Path & [Ô]\Fotos\logo.jpg[Ô]
C:\Teste\Exemplo\Fotos\logo.jpg

Este erro [Ô]Path 76[Ô] vem de dentro do ActiveReport.

[][ô]s,
Tunusat.
ROBSONSLZ 03/09/2015 11:53:04
#450950
entre o cmdreport1 e o cmdreport2 o evento click esta correto. O erro esta no caminho do banco. Na tabela (tableA) do banco o caminho onde fica as fotos esta assim: (fotos\01.jpg) neste caso nao ocorre erro ao chamar o relatorio (1).

Ja na segunda tabela (tableB) o caminho onde esta as fotos esta assim: (\fotos\A.jpg) neste caso ocorre o erro ao chamar o relatorio. (Repare que na segunda tableB) o caminho tem uma barra invertida [Ô]\[Ô] (path not found 76)

#Resumindo: pois ja o segundo é o preferencial (tableB) para armazenar as fotos (na pasta fotos do cadastro)
ROBSONSLZ 03/09/2015 12:06:21
#450951
Citação:

:
entre o cmdreport1 e o cmdreport2 o evento click esta correto. O erro esta no caminho do banco. Na tabela (tableA) do banco o caminho onde fica as fotos esta assim: (fotos.jpg) neste caso nao ocorre erro ao chamar o relatorio (1).

Ja na segunda tabela (tableB) o caminho onde esta as fotos esta assim: ( otosA.jpg) neste caso ocorre o erro ao chamar o relatorio. (Repare que na segunda tableB) o caminho tem uma barra invertida [Ô][Ô] (path not found 76)

#Resumindo: pois ja o segundo é o preferencial (tableB) para armazenar as fotos (na pasta fotos do cadastro)



(ActiveReport1)
Private Sub ActiveReport_FetchData (EOF As Boolean)
[ô]Correto
If EOF = False Then
Set Image1.Picture = LoadPicture (DataControl1.Recordset!FotoA)
End if
End Sub

(ActiveReport2)
Private Sub ActiveReport_FetchData (EOF As Boolean)
[ô]Erro
If EOF = False Then
Set Image1.Picture = LoadPicture (DataControl1.Recordset!FotoB)
[ô]devido a barra [Ô]\[Ô] do caminho da foto na tabela.
End if
End Sub
TUNUSAT 03/09/2015 15:25:14
#450963
ROBSONSLZ,

Existe um fórum específico para o Active Reports:
============================================================
Fórum
Home Community
http://arhelp.grapecity.com/
============================================================

Achei este manual tb, mas ... é da versão 7 ...
============================================================
ActiveReports 7 User Guide
http://helpcentral.componentone.com/nethelp/ActiveReports7UserGuide.pdf
============================================================

[][ô]s,
Tunusat.
Página 1 de 2 [11 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar