USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  erro MSFLEXGRID
Tenci
GUARUJÁ
SP - BRASIL
ENUNCIADA !
Postada em 07/08/2008 12:58 hs            
ESTOU CARREGANDO UM MSFLEXGRID, E QUANDO MANDO CARREGAR, APARECE O SEGUINTE ERRO:


"run time erro: '94'"
"invalid use of null"

obs esse erro ocorre qdo coloco o rs!cidade...,rs!uf...


o cod q estou usando e esse:
MSFlexGrid.Rows = rs.RecordCount + 1


I = 1
Do While Not rs.EOF
    MSFlexGrid.TextMatrix(I, 0) = rs!Status
    MSFlexGrid.TextMatrix(I, 1) = rs!seqpessoa
    MSFlexGrid.TextMatrix(I, 2) = rs!nomerazao
    MSFlexGrid.TextMatrix(I, 3) = rs!fantasia
    MSFlexGrid.TextMatrix(I, 4) = rs!cidade
'    MSFlexGrid.TextMatrix(I, 5) = rs!uf
    
    I = I + 1
    rs.MoveNext
Loop
ColorirGrid
End Sub


obrigado pela colaboracao de todos.
   
Lucas Felix
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 07/08/2008 13:02 hs            
Algum dos campos que vem do rs tá vazio, qual linha que deu o erro?
   
Maxcim
GUARULHOS
SP - BRASIL
ENUNCIADA !
Postada em 07/08/2008 16:43 hs            
MSFlexGrid.TextMatrix(I, 3) = iif(isnull(rs!fantasia),"",rs!fantasia)
 
isso deve resolver aplique a todas as Rst que tem valor nulo.
   
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
ENUNCIADA !
Postada em 07/08/2008 18:06 hs            
 ou
 
    MSFlexGrid.TextMatrix(I, 0) = rs!Status & ""
    MSFlexGrid.TextMatrix(I, 1) = rs!seqpessoa & ""
    MSFlexGrid.TextMatrix(I, 2) = rs!nomerazao & ""
    MSFlexGrid.TextMatrix(I, 3) = rs!fantasia & ""
    MSFlexGrid.TextMatrix(I, 4) = rs!cidade & ""
    MSFlexGrid.TextMatrix(I, 5) = rs!uf & ""

   
Tenci
GUARUJÁ
SP - BRASIL
ENUNCIADA !
Postada em 08/08/2008 09:02 hs            
VALEU PELA DICA CAROS AMIGOS VBWEBERIROS, COMO SEMPRE AJUNDANDO.




CORDIALMENTE.

VALTENCI.
   
LCRamos
Pontos: 2843
GOIANIA
GO - BRASIL
ENUNCIADA !
Postada em 08/08/2008 13:50 hs            
Tente isto dá certo.
I = 1
Do While Not rs.EOF
    MSFlexGrid.TextMatrix(I, 0) = "" &  rs!Status
    MSFlexGrid.TextMatrix(I, 1) = "" & rs!seqpessoa
    MSFlexGrid.TextMatrix(I, 2) = "" & rs!nomerazao
    MSFlexGrid.TextMatrix(I, 3) = "" & rs!fantasia
    MSFlexGrid.TextMatrix(I, 4) = "" & rs!cidade
'    MSFlexGrid.TextMatrix(I, 5) = "" & rs!uf
    
    I = I + 1
    rs.MoveNext
Loop
ColorirGrid
End Sub
 
vlu//
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página