SENHA NO CRYSTAL REPORTS COM DATASET

MRPESTOQUE 12/03/2014 13:11:59
#435910

olá

alguém pode me ajudar no seguinte caso, tenho um relatório do Crystal report com um dataset que carrega uma imagem de um diretório, na hora de visualizar o relatório aparece a tela pedindo a senha e usuário do sql server.

o código para carregar a imagem é o seguinte:

Private Function carregaImagem(ByVal fileName As String) As Byte()

[ô]Método para carregar uma imagem do disco e retorná-la como um byteStream
Dim fs As FileStream = New FileStream(fileName, FileMode.Open, FileAccess.Read)
Dim br As BinaryReader = New BinaryReader(fs)
Return (br.ReadBytes(Convert.ToInt32(br.BaseStream.Length)))

End Function
Private Sub carregar()

Dim teste As String
teste = [Ô]\\server\e\imagens\[Ô] & txtdesenho.Text



Try

Dim dsBandas As New GeradorImagens

[ô]Cria uma nova instância do relatório
Dim rptBandas As New RptProduto

[ô]Cria uma nova linha no dataset
Dim dr As GeradorImagens.ImageRow = dsBandas.Image.NewImageRow

[ô]Define os elementos da linha
dr.codigo = teste
[ô]preenche o campo com o byte array

dr.photo = carregaImagem(teste)

[ô]Inclui a nova linha no dataset
dsBandas.Image.Rows.Add(dr)

[ô]Usa o dataset como fonte de dados para o relatório
rptBandas.SetDataSource(dsBandas)

[ô]Exibe o relatório no reportviewer

Me.CrystalReportViewer1.ReportSource = rptBandas

Catch ex As Exception

MessageBox.Show(ex.Message)
End Try

[ô]End If

End Sub

como posso resolver isso?