ADL

Eu vi a dúvida da nossa amiga eu gostaria de saber, pois vou precisar fazer com que o sistema que desenvolvi aqui na empresa converse com um leitor de código de barra. como eu começo a fazer isso ou onde eu encontro um código pronto o que é preciso para desenvolver isso. Valeu.

Então eu preciso fazer um select que retorne, por exemplo o assunto se o ano for por exemplo 2007.

não! Eu preciso que ela me retorne. O numero da pasta se o assunto for trabalhista por emxemplo.

Olá pessoal desculpe incomodar vocês novamente. É o seguinte, estou precisando fazer um select na tabela pessoa, e ela me retorne assim. O select tem que retornar o ano cujo o assunto seja um determinado. estou confuso pois o que eu sei é muito basico. Alguém pode me ajudar? Preciso fazer essa busca mais avançada. Segue o código que estou usando. Desde já agradeço a todos. sqlTabela = "Select * From pessoa" sqlTabela = sqlTabela + " WHERE " + result1 + " Like " + " '%" + result + "%' " sqlTabela = sqlTabela + " ORDER BY cliente" set rsTabela = conexaoDataBase.execute(sqlTabela) essa aqui está funcionando perfeitamente, mas quero adapta-la me ajudem por favor, e mais uma vez muito obrigado.

Não funcionou, eu dei um response na sintaxe ela retorna false.

Estou fazendo um select para retornar o conteudo do banco por mês, e gostaria de saber se essa sintaxe está correta ok muito obrigado . há ela está me retornando esse erro: ADODB.Field erro '80020009' BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação solicitada pelo aplicativo requer um registro atual. /pauta/listarPauta.asp, line 0 Segue o código hoje=date() diaSemana=weekDay(hoje) dataIni = cdate((hoje - diaSemana))+1 sa=(Year(dataIni) &"/"& Month(dataIni) &"/"& Day(dataIni)) dataFim=cdate(dataIni + 30) se=(Year(dataFim) &"/"& Month(dataFim) &"/"& Day(dataFim)) Call abreConexao result=trim(request.form("valor")) result1=cstr(trim(request.Form("modo"))) sqlTabela = "Select * From agenda where data between ' " & sa & " ' and ' " & se & " ' " sqlTabela = sqlTabela + " ORDER BY data desc " set rsTabela=conexaoDataBase.execute(sqlTabela) Estou usando mysql. muito obrigado.

Alguém sabe onde eu posso encontrar uma função que calcula Distância, Peso, volume em java Script.

então quando eu faço isso aqui dia = CDate(rsTabela("data")) + 2 é para verificar se a data que está no banco + 2 é igual a data do sisitema. Se for então ele manda o email para aqulea data. Por exemplo eu cadastrei uma audiência hoje, para o dia 6-7-2007 então só eu irei receber o email. A minha dúvida e que se a data do banco + 2 for igual a data do sisitema quero que todos os úsuários receban o email . beleza, espero que tenha ficado claro. Muito obrigado pelas dicas.

pode ser. todos tem que receber. o que você acha melhor? obrigado pela ajuda.

está tudo ok. Eu quero que ele mande email para todos os usuarios que estiver no banco de dados ok. Obrigado cara estou precisando muito disso ok valeu.

Olá pessoal estou com um script de mandar email, que funciona perfeitamente. Só que o script, manda só um email. Eu gostaria que fosse mandado o mesmo email para todos os usários que estiverem cadastrado no banco de dados. segue o script <%@LANGUAGE="VBSCRIPT"%> <% Option explicit %> <!--#Include file="conexaoBD/conexao.inc"--><% response.expires=0 dim estilo,conexaoDataBase,ConnString,rsTabela,sqlTabela,dia,hora,msgTexto,nome,objC OSYSMail,objCDOSYSCon,data,semana,hora1,cliente,sqlLogin,rsLogin Call abreConexao sqlTabela = "Select *From agenda" set rsTabela = conexaoDataBase.execute(sqlTabela) do while not rsTabela.eof dia = cdate(rsTabela("data"))+2 if dia = date then data=rsTabela("data") semana= rsTabela("semana") hora1= rsTabela("hora") cliente=rsTabela("cliente") Set objCDOSYSMail = Server.CreateObject("CDO.Message") Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration") objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "meu provedor de email" objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30 objCDOSYSCon.Fields.Update Set objCDOSYSMail.Configuration = objCDOSYSCon objCDOSYSMail.From = "audiencia@hondadef.com.br" objCDOSYSMail.To = rsTabela("email") objCDOSYSMail.Subject = "AUDIÊNCIA" objCDOSYSMail.TextBody = "Prezado(a) Estamos informando que faltam 2 dias para AUDIÊNCIA, do cliente, "&cliente&" que ocorrera no dia "&data&" na "&semana&" às "&hora1&"." objCDOSYSMail.Send Set objCDOSYSMail = Nothing Set objCDOSYSCon = Nothing end if rsTabela.movenext loop Call fechaConexao set rsTabela = nothing %>

Coloca o código fica mais facil de visualizar o erro. Mas parece que você está usando alguma coisa que já está em uso.

Oi você pode fazer o seguinte. dar select na tabela A e um select na B ai você cria 3 variaveis e joga os valores dentro. sql="select * from nome da tabela" rsTabela=variavel de conexao.execute(sql) ok ai você cria as variaveis como eu falei por exemplo nome, rg nome = rsTablea("nome") rg = rsTabela("rg") faz isso com as outras depois pegas essas variaveis e colono no insert da tabela c ok. espero te ajudado

Sim eu consigo!

tenho sim é o 3.51. Quando eu chamo a página ela fica carregando carregando e nada. O mysql que eu instalei veio no pacote do phptriad. onde eu instalei.Eu estou rodando o asp na porta 88 porque ele entra em conflito com php, será que pode ser isso?

Então agora fica carregando e não mostra a página e também não mostra erro, a barra de status fica carregado,carregando e carregando e nada o que pode sder?

Olá pessoal estou tentando conectar ASP + MYSQL mas não estou conseguindo, estou usando uma string para conectar mas está dando esse erro não sei mais o que fazer . Meu che fe me deu um prazo preciso correr. segue o erro: Tipo de erro: Erro de tempo de execução do Microsoft VBScript (0x800A01A8) Objeto necessário: 'ConnString' /pauta/conexaoBD/conexao.inc, line 4 esse é o código de conexao: <% sub AbreConexao set conexaoDataBase = Server.CreateObject("ADODB.Connection") ConnString.ConnectionString = "Driver=MySQL ODBC 3.51 Driver;DATABASE=banco;SERVER=localhost;UID=;PASSWORD=;" ConnString.Open end sub sub FechaConexao conexaoDataBase.close set conexaoDataBase = nothing end sub %>

Se você está passando paramentro por formulario você deve usar o request.form("") não o request.queryString esse request o request.queryString e quando você quer recuperar dados através de link o que esper te ajudado.

instalei o driver agora da esse erro Microsoft OLE DB Provider for ODBC Drivers (0x80004005) [MySQL][ODBC 3.51 Driver]Can't connect to MySQL server on 'localhost' (10061) sabe o que é?

obrigado por me passar esse link achei a string coloquei mas está dando esse erro: Tipo de erro: Microsoft OLE DB Provider for ODBC Drivers (0x80004005) [Microsoft][ODBC Driver Manager] Nome da fonte de dados não encontrado e nenhum driver padrão especificado /pauta/conexaoBD/conexao.inc, line 4 o que está faltando por favor? <% sub AbreConexao set conexaoDataBase = Server.CreateObject("ADODB.Connection") conexaoDataBase.Open "driver=MySQL ODBC 3.51 Driver;DATABASE=banco;SERVER=localhost;Option=16834;" conexaoDataBase.Open ConnString end sub sub FechaConexao conexaoDataBase.close set conexaoDataBase = nothing end sub %>

Olá pessoal gostaria de uma ajuda estou pesquisando como conectar asp com mysql nas não estou entendendo, será que alguém pode me ajudar por favor. quero conectar atraves dessa string aqui eu uso para conectar em access. <% sub AbreConexao set conexaoDataBase = Server.CreateObject("ADODB.Connection") ConnString ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\pauta1\banco1\banco.mdb;Persist Security Info=False" conexaoDataBase.Open ConnString end sub sub FechaConexao conexaoDataBase.close set conexaoDataBase = nothing end sub %> e o banco esta na minha maquina local pois estou usando o phpmyadmin.. Por favor ok pessoal muito obrigado.

muito obrigado

Olá pessoal quero começar a programar em PHP o que eu preciso ter instalado em minha maquina. meu windows é o XP service pack 2 e. onde achar os componentes de instalação? desde já eu agradeço.

dentro do principal você criou um objeto com o nome da classe. assim: public static void main(String args[]){ Prm_Licao app = new Prm_Licao(); app.Seg_Licao() // observe essa linha app.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE); } quando você cria um objeto, ele é quem " tem poder sobre a classe sobre os metodos" é isso ai espero te ajudado.

Cara você tem reconfigurar. vai em ferramentas opções de internet avançadas marque a opção mostrar mensagem de erro amigavel.