usar where após tabela estar aberta

[Claudio Neto 3]

Olá, por acaso existe com eu filtar uma consulta após estar com a tabela carregada no recordset?

 

Por exemplo, vamos supor que eu esteja trabalhando com a tabela pedido. e nessa tabela eu tenha tres vendedores e queira fazer consultas diferenciadas por vendedor.

 

Sei que posso abrir três recordset, um para cada vendedor, mas não queria fazer isso.

 

Tem como eu abrir a tabela pedido inteira, depois dizer que só quero informações de um vendedor ou de outro?

 

Ah, estou usando SQLSever2000 e minha conexão é via ADO.

 

 

Obrigado...

[Macêdo 0]

Digamos que você carregou seu recordset durante o From_Load, e jogou os dados dos campos nas text's ou num datagrid assim:

 

Private Sub Form_Load()

With cmd
	.ActiveConnection = cnn
	.CommandType = adCmdText
	.CommandText = "select * from tabela "
	Set rs = .Execute
End With
With rs
If Not (.BOF And .EOF) Then
	Set DataGrid1.DataSource = rs
	Text1 = !nome
	Text2 = !endereco
	Text3 = IIf(IsNull(rs!Data), "", rs!Data)

End With
End If

Agora para mostrar apenas de um vendedor seria só fazer um filter neste RS assim:

 

With RS
	   .Filter = "cod = " & DataGrid1.Columns.Item(0) & ""
End With

Onde o campo cod se refere ao codigo do Vendedor que você quer que apareça as vendas.

[Claudio Neto 3]

Digamos que você carregou seu recordset durante o From_Load, e jogou os dados dos campos nas text's ou num datagrid assim:

 

Private Sub Form_Load()

With cmd
	.ActiveConnection = cnn
	.CommandType = adCmdText
	.CommandText = "select * from tabela "
	Set rs = .Execute
End With
With rs
If Not (.BOF And .EOF) Then
	Set DataGrid1.DataSource = rs
	Text1 = !nome
	Text2 = !endereco
	Text3 = IIf(IsNull(rs!Data), "", rs!Data)

End With
End If

Agora para mostrar apenas de um vendedor seria só fazer um filter neste RS assim:

 

With RS
	   .Filter = "cod = " & DataGrid1.Columns.Item(0) & ""
End With

Onde o campo cod se refere ao codigo do Vendedor que você quer que apareça as vendas.

Maravilha Macedo, é isso mesmo que preciso, eu tentei usar o filter, mas não sabia como usar, o que faltou eu colocar foi o "=", eu tinha tentado usar que nem o open que escreve direto, ai não deu certo.

 

Abraços e feliz ano novo...