Aquatico
|
SÃO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 13/06/2006 09:38 hs
Coloquei igual vc morstrou, mas ainda continua dando erro, segue o erro abaixo: Line 1: Incorrect syntax near '#'. Obrigado. Paulo Ricardo |
|
|
|
|
|
|
|
Postada em 13/06/2006 09:45 hs
vc pode me mostrar o código mais completo... qdo vc passa a sql para a conexão executar? Tipo assim: ConexaoADO.Execute SQL obrigado |
|
|
|
Aquatico
|
SÃO PAULO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 13/06/2006 09:49 hs
Dim RSSQL As New ADODB.Recordset
Dim CN As New ADODB.Connection VARBANCO = "SMO" VARSERVER = "192.168.0.101" Set CN = New ADODB.Connection
CN.CursorLocation = adUseClient
CN.ConnectionString = "Provider=SQLOLEDB.1;Password=101025;Persist Security infotec=True;User ID=sa;Initial Catalog=" & VARBANCO & ";Data Source=" & VARSERVER
CN.Open RSSQL.CursorType = adOpenKeyset
RSSQL.LockType = adLockOptimistic
RSSQL.ActiveConnection = CN |
|
|
|
|
|
Postada em 13/06/2006 09:57 hs
Nooo... só queria saber qdo vc usa a sql... mas td bem... tenta assim então: DATAI = Format(txtDataI.Value, "MM/DD/YYYY")
DATAF = Format(txtDataF.Value, "MM/DD/YYYY")
FILTROSQL = "SELECT * FROM AH010 WHERE "
EXPSQL = "[AH_DATA] >= #" & DATAI & "# AND [AH_DATA] <= #" & DATAF & "#"
FILTROSQL = FILTROSQL & EXPSQL
t+ |
|
|
|
Aquatico
|
SÃO PAULO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 13/06/2006 10:24 hs
Continua com o mesmo erro ainda, ja verifiquei a tabela e o campo, esta tudo ok, consigo até executar o select abaixo sem nenhum problema, mas com intervalo de datas não da certo mesmo. SELECT * FROM AH010 ORDER BY AH_DATA Obrigado Paulo Ricardo |
|
|
|
|
|
Postada em 13/06/2006 10:38 hs
Tá muito estranho...deveria dar certo... tira as "#" e testa com alguns intervalos de datas. Depois tenta colocar aspas simples no lugar das "#" |
|
|
|
