Parâmetros - VB 2005 - Crystal - SQL

Question

Ei Pessoal, preciso emitir um relatório. Estou utilizando Crystal, VB 2005 e SQL. Porém na hora de está me dando a seguinte mensagem de erro:

"The types of the parameter field and parameter field current values are not compatible".

Pelo CommandWindow, sei que minha string de parâmetro está da seguinte forma, no momento do erro:

"@Codigo=0&@De='20060101'&@Ate='20070101'&@Fornecedor=0"

Os parâmetros da minha procedure são:

@Codigo int,

@De smalldatetime,

@Ate smalldatetime,

@Fornecedor int.

Será que alguém pode me dar uma força?

Answer 1

Acredito que o problema esteja no formato das datas.

Que tipo de formato é esse? Do banco de dados ou do CR ?

Boa sorte!!!

Answer 2

Olá, andei pesquisando e já mudei bastante o meu código. Não sei se está da forma correta. Está assim:

Imports CrystalDecisions.CrystalReports.Engine

Imports CrystalDecisions.CrystalReports.Engine.ReportDocument

Imports CrystalDecisions.Shared

Imports System.IO

Public Class FrmInicio

Private Sub BTSair_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTSair.Click

Close()

End Sub

Private Sub BTImprimir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTImprimir.Click

Dim vCodigo, vDe, vAte, vFornecedor As String

Dim Relatorio As New FrmRelatorios

Dim CR_RelOrdemCompra As New ReportDocument()

CR_RelOrdemCompra.Load("C:\Documents and Settings\Tandy\Meus documentos\Visual Studio 2005\WebSites\JIOrdemCompra\CR_RelOrdemCompra.rpt")

vCodigo = TBPedido.Text

vDe = Dp_De.Value

vAte = Dp_Ate.Value

vFornecedor = TBFornecedor.Text

CR_RelOrdemCompra.SetParameterValue("@vCodigo", vCodigo)

CR_RelOrdemCompra.SetParameterValue("@De", vDe)

CR_RelOrdemCompra.SetParameterValue("@Ate", vAte)

CR_RelOrdemCompra.SetParameterValue("@Fornecedor", vFornecedor)

Relatorio.Show()

Relatorio.ViewReport(CR_RelOrdemCompra)

End Sub

End Class

Mas estou tendo o seguinte erro: Load report failed

Será que alguém pode dar alguma idéia sobre isso?

Obrigada

Answer 3

ola

talvez usando o Server.MapPath("CR_RelOrdemCompra.rpt").ToString, em vez de "C:\Documents and Settings\Tandy\Meus documentos\Visual Studio 2005\WebSites\JIOrdemCompra\CR_RelOrdemCompra.rpt"

Answer 4

Não consigo usar o Server.MapPath("CR_RelOrdemCompra.rpt")  noVB2005.. tenho que importar alguma coisa? ... Ele sublinha o Server.MapPath("alguma coisa") mostrando como erro

 

aguardo retorno...

 

Mrfurlan