Contagem não funciona


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Contagem não funciona

CONTAGEM
MG - BRASIL

ENUNCIADA !

Postada em 04/04/2006 10:51 hs

Por mais simples que seja, esta me pegando de jeito. Tenho este código de exemplo:

cnn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=banco;Data Source= " & mdiprincipal.strserver & ";"

rs.Open "select * from tabela where datacadastro > '" & Format(delta1, "mm-dd-yyyy") & " ' and dtcadastro < ' " & Format(delta2, "mm-dd-yyyy") & "'", cnn, adOpenStatic, adLockOptimistic

Text3.Text = rs.Count

Bom, o que acontece aí é um erro no último comando dizendo que o objeto rs não suporta a propriedade count ou o objeto.

Como resolver isso. Eu preciso saber o total de cadastro durante o periodo.

Desde já agradeço.

ghost_jlp

SÃO PAULO
SP - BRASIL

ENUNCIADA !

Postada em 04/04/2006 10:56 hs

para funcionar do jeito q vc quer tem q primeiramente posicionar o cursor do lado do cliente... assim:

***************************************************

cnn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=banco;Data Source= " & mdiprincipal.strserver & ";"

rs.cursorlocation = aduseclient '<= insira aqui

rs.Open "select * from tabela where datacadastro > '" & Format(delta1, "mm-dd-yyyy") & " ' and dtcadastro < ' " & Format(delta2, "mm-dd-yyyy") & "'", cnn, adOpenStatic, adLockOptimistic

*****************************************************

Bom, a propriedade "count" q eu saiba não existe... vc tem q usar a recordcount:

**************************

Text3.Text = rs.RecordCount

***************************

blz?

Testa ae... qq coisa é só postar

Cardoso G

PATOS DE MINAS
MG - BRASIL

ENUNCIADA !

Postada em 04/04/2006 10:56 hs

nao é count e sem rs.recordcount

Elieser Topassi

SÃO JOSÉ DO RIO PRETO
SP - BRASIL

ENUNCIADA !

Postada em 04/04/2006 12:45 hs

Alem de trocar Count por RecordCount,
tem q setar o cursor do lado do cliente tambem, senao vai retornar sempre -1

Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn: elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
"O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR