ERRO ILOGICO EM SQL SELECT

USUARIO.EXCLUIDOS 24/08/2007 21:57:43
#232639
Olha eu novamente ai galera, desta vez o problema é o seguinte:

para ter sempre à mão como se fosse uma anotação do projeto que se está trabalhando criei tipo um marcador de página de um livro, lanço numa statusbar o cod e o nome do projeto que está em uso, para ficar assim no topo do MDI:

COD: 13 NOME: JILNEY O MACEDO

porém só está funcionando com o nome, no campo do código tá dando erro:

Private Sub Cmd_MARCADOR_Click()

Dim cnncomando As New ADODB.Command
Dim rs_Pronaf As New ADODB.Recordset
With cnncomando
    .ActiveConnection = cnnProjetos
    .CommandType = adCmdText
    .CommandText = " select * from projetos "
    Set rs_Pronaf = .Execute
End With
With rs_Pronaf
    If TextCOD_PROJETOS.Text = "" Then
    Dim vAviso As Integer
    vAviso = MsgBox("Não foi selecionado nenhum projeto para o Marcador", vbOKOnly + vbCritical, "ATENÇÃO")
    
    Else
    rs_Pronaf.Filter = "cod = " & TextCOD_PROJETOS
    
    MDIprojetos.StatusBar2.Visible = True
    MDIprojetos.StatusBar2.Panels(1) = "COD: " + !COD
    MDIprojetos.StatusBar2.Panels(2) = "NOME: " + !NOME
    
End If
End With

Set cnncomando = Nothing
Set rs_Pronaf = Nothing

End Sub


'Bom o erro está na linha:

MDIprojetos.StatusBar2.Panels(1) = "COD: " + !COD

não aparece o codigo na statusbar

Run time error '13' tipy mismatch, quando retiro e deixo só o :

MDIprojetos.StatusBar2.Panels(2) = "NOME: " + !NOME

este tá beleza

se funciona no segundo porque não no primeiro?
USUARIO.EXCLUIDOS 24/08/2007 23:07:06
#232640 Resposta escolhida
kra eu axo q pq o campo cod e numero ele tah tentando somar

concatena com & q axo q dah certo

XD

uma coisa use sempre & para concatenar assim vc evita transtornos futuramente

XD

pq se um dos campos for numero ele vai reconhecer como soma e vai da erro, agora se os dois forem texto ai ele concatena normal, mais procure usar &
USUARIO.EXCLUIDOS 24/08/2007 23:24:10
#232641
Valeu Milton! foi em cima camarada, vou ficar atento quanto a isto agora.
Tópico encerrado , respostas não são mais permitidas
Voltar