Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Confere aí, ocorre o seguinte erro:
Microsoft JET Database Engine (0x80040E14)Erro de sintaxe (operador faltando) na expressão de consulta 'codcliente= AND nomefantasia='Adkak ltda' AND razaosocial='Adkak ltda' AND atividade='representante' AND cnpj=12121221 AND inscricao_estadual=2121212 AND inscricao_municipal=132131 AND inicio_atividade='11/10/2000' AND endere'./formdinamico/dados_cadastrados5.asp, line 115
O sql está assim:
SQL = "SELECT codcliente From clientes WHERE codcliente="&codcliente&" AND nomefantasia='"&nomefantasia&"' AND razaosocial='"&razaosocial&"' AND atividade='"&atividade &"' AND cnpj="&cnpj&" AND inscricao_estadual="&inscricao_estadual&" AND inscricao_municipal="&inscricao_municipal&" AND inicio_atividade='"&inicio_atividade&"' AND endereco_empresa='"&endereco_empresa&"' AND bairro_empresa='"&bairro_empresa&"' AND municipio_empresa='"&municipio_empresa&"' AND estado_empresa='"&estado_empresa&"' AND cep_empresa="&cep_empresa&" AND pais_empresa='"&pais_empresa&"' AND telefone_empresa="&telefone_empresa&" AND fax_empresa="&fax_empresa&" AND site_empresa='"&site_empresa&"' AND email_empresa='"&email_empresa&"' AND data="&data&" AND banco_conta='"&banco_conta&"' AND conta_conta="&conta_conta&" AND agencia_conta="&agencia_conta&" AND contato_conta='"&contato_conta&"' AND telefone_conta='"&telefone_conta&"' AND observacoes_conta='"&observacoes_conta&"'"
A linha 115 é essa:
Set RS = objConexao.Execute(SQL)
A variável codcliente está vazia.
N3G4T1V3, não deu certo o response.write, eu estou usando o access, mas não sei usar o modo sql no mesmo, eu testei assim:
On error Resume Next
SQL = "SELECT * From clientes WHERE codcliente="&codcliente&" AND nomefantasia='"&nomefantasia&"' AND razaosocial='"&razaosocial&"' AND atividade='"&atividade&"' AND cnpj="&cnpj&" AND inscricao_estadual="&inscricao_estadual&" AND inscricao_municipal="&inscricao_municipal&" AND inicio_atividade='"&inicio_atividade&"' AND endereco_empresa='"&endereco_empresa&"' AND bairro_empresa='"&bairro_empresa&"' AND municipio_empresa='"&municipio_empresa&"' AND estado_empresa='"&estado_empresa&"' AND cep_empresa="&cep_empresa&" AND pais_empresa='"&pais_empresa&"' AND telefone_empresa="&telefone_empresa&" AND fax_empresa="&fax_empresa&" AND site_empresa='"&site_empresa&"' AND email_empresa='"&email_empresa&"' AND banco_conta='"&banco_conta&"' AND conta_conta="&conta_conta&" AND agencia_conta="&agencia_conta&" AND contato_conta='"&contato_conta&"' AND telefone_conta='"&telefone_conta&"' AND observacoes_conta='"&observacoes_conta&"' AND data="&data&" "
Set RS = objConexao.Execute(SQL)
Response.Write SQL
Response.END()
E passa fikava assim:
SELECT * From clientes WHERE codcliente= AND nomefantasia='Adkak ltda' AND razaosocial='Adkak ltda' AND atividade='representante' AND cnpj=12121221 AND inscricao_estadual=2121212 AND inscricao_municipal=132131 AND inicio_atividade='11/10/2000' AND endereco_empresa='Av. das flores' AND bairro_empresa='Jardim Esper' AND municipio_empresa='São Paulo' AND estado_empresa='TO' AND cep_empresa=1122212 AND pais_empresa='32' AND telefone_empresa=12122221 AND fax_empresa=4454654646 AND site_empresa='http://www.teste.com.br' AND email_empresa='teste@teste.com.br' AND banco_conta='Bradescco' AND conta_conta=21212 AND agencia_conta=12121 AND contato_conta='Andre' AND telefone_conta='112222222' AND observacoes_conta='' AND data=26/10/2005Será que ajuda :unsure:
A variável codcliente está vazia.
Tá sim, pq ela é autonumeraçao, mas eu já tirei ela do sql e ficou igual?
voce tem de tirar issocodcliente= AND
Olá marioufpa, tirei o que você me falou, mas continuou com o erro, meu banco está assim:' TABELA DA EMPRESAcodcliente ' autonumeraçãonomefantasia 'textorazaosocial ' textoatividade ' textocnpj ' númeroinscricao_estadual ' númeroinscricao_municipal ' númeroinicio_atividade ' dataendereco_empresa ' textobairro_empresa ' textomunicipio_empresa ' textoestado_empresa ' textocep_empresa ' númeropais_empresa ' textotelefone_empresa ' númerofax_empresa ' númerosite_empresa ' textoemail_empresa ' textodata 'databanco_conta ' textoconta_conta ' númeroagencia_conta ' númerocontato_conta ' textotelefone_conta ' númeroobservacoes_conta ' memorando========================================'TABELA DO CONTATOcodcontato ' autonumeraçãotitulo_contato ' textodepartamento_contato ' textonome_contato ' textosobrenome_contato ' textoendereco_contato ' textobairro_contato ' textomunicipio_contato ' textocep_contato ' númeroestado_contato ' textotelefone_contato ' númerofax_contato ' númerocelular_contato ' númeroemail_contato ' textoobservacao_contato ' memorandodataultimo_contato ' datacodtipo_contato ' textoreferenciadopor_contato ' texto'interesse_contato ' textocodcliente ' número
Amigo tente executar sua query no access faça assim abra o access, clique na parte de consultas, ai você clica em criar uma consulta no modo estrutura, ai ele vai pedir para selecionar as tabelas que você quer mas pode fechar.., ai vai ter uma janelinha la aberta, clique com o botão direito e clique em modo SQL ai você colca sua query la e clica no ! para executar e veja o que acontece...
SQL = "SELECT * From clientes WHERE nomefantasia='"&nomefantasia&"' AND razaosocial='"&razaosocial&"' AND atividade='"&atividade&"' AND cnpj="&cnpj&" AND inscricao_estadual="&inscricao_estadual&" AND inscricao_municipal="&inscricao_municipal&" AND inicio_atividade='"&inicio_atividade&"' AND endereco_empresa='"&endereco_empresa&"' AND bairro_empresa='"&bairro_empresa&"' AND municipio_empresa='"&municipio_empresa&"' AND estado_empresa='"&estado_empresa&"' AND cep_empresa="&cep_empresa&" AND pais_empresa='"&pais_empresa&"' AND telefone_empresa="&telefone_empresa&" AND fax_empresa="&fax_empresa&" AND site_empresa='"&site_empresa&"' AND email_empresa='"&email_empresa&"' AND banco_conta='"&banco_conta&"' AND conta_conta="&conta_conta&" AND agencia_conta="&agencia_conta&" AND contato_conta='"&contato_conta&"' AND telefone_conta='"&telefone_conta&"' AND observacoes_conta='"&observacoes_conta&"' AND data=#"&data&"#;"
Set RS = objConexao.Execute(SQL)
>
SQL = "SELECT * From clientes WHERE nomefantasia='"&nomefantasia&"' AND razaosocial='"&razaosocial&"' AND atividade='"&atividade&"' AND cnpj="&cnpj&" AND inscricao_estadual="&inscricao_estadual&" AND inscricao_municipal="&inscricao_municipal&" AND inicio_atividade='"&inicio_atividade&"' AND endereco_empresa='"&endereco_empresa&"' AND bairro_empresa='"&bairro_empresa&"' AND municipio_empresa='"&municipio_empresa&"' AND estado_empresa='"&estado_empresa&"' AND cep_empresa="&cep_empresa&" AND pais_empresa='"&pais_empresa&"' AND telefone_empresa="&telefone_empresa&" AND fax_empresa="&fax_empresa&" AND site_empresa='"&site_empresa&"' AND email_empresa='"&email_empresa&"' AND banco_conta='"&banco_conta&"' AND conta_conta="&conta_conta&" AND agencia_conta="&agencia_conta&" AND contato_conta='"&contato_conta&"' AND telefone_conta='"&telefone_conta&"' AND observacoes_conta='"&observacoes_conta&"' AND data=#"&data&"#;"Set RS = objConexao.Execute(SQL)
Dá esse erro agora:
Tipo de dados imcompatível na expressão de critério.
/formdinamico/dados_cadastrados5.asp, line 175
linha 175 Set objRS = objConexao.Execute(strSQL) :mellow:
Esse erro é em outro lugar agora.
Esse erro é em outro lugar agora.
É verdade, muito obrigado a todos por me ajudar, sou muito grato a vocês...valeu!!!
antes de executar a instrução sql de umresponse.write(SQL)e verifique..caso esteja tudo correto execute direto no banco.. caso access no modo sql do access e caso for sql tenta executa no query analyzer