|
|
Postada em 31/07/2006 07:00 hs
Bom dia, Estou fazendo uma consulta da seguinte forma: Set rs = New ADODB.Recordset
rs.Open "Select * from autores where au_id='" & combo1.text & "'", cn, adOpenDynamic, adLockReadOnly
While Not rs.EOF
Text1.Text = rs.Fields("author")
rs.MoveNext
Wend O problema é que lá no banco esse campo AU_ID é Autonumeração e essa pesquisa retorna uma mensagem informando que os dados são incompativeis. Eu mudei para texto o campo AU_ID da tabela e deu certo......porém gostaria de saber qual a maneira correta de fazer isso, sem ter que mudar nada na tabela Obrigado |
|
|
|
|
|
|
|
Postada em 31/07/2006 09:06 hs
Bom Dia, O Campo auto-numeração é do tipo numérico. Assim você deve mudar sua consulta para: rs.Open "Select * from autores where au_id = " & VAL(combo1.text) & ";", cn, adOpenDynamic, adLockReadOnly
Um abraço DV |
|
|
|
|
|
Postada em 31/07/2006 10:57 hs
rs.Open "Select * from autores where au_id = " & cint(combo1.text) , cn, adOpenDynamic, adLockReadOnly
|
|
|
|
|
|
Postada em 31/07/2006 21:29 hs
As duas formas OK...... Sinceramente não conhecia a função CInt e não tinha visto nenhuma consulta sem apostrofe... Vivendo e aprendendo. Valeu !!!!! |
|
|
|
|
|
Postada em 01/08/2006 07:43 hs
ok, precisando é so falar. |
|
|
|
