Jump to content
Fórum Script Brasil

lucascabs

Membros
  • Content Count

    28
  • Joined

  • Last visited

Community Reputation

0 Neutro

About lucascabs

  1. ***** so uma duvida ... conforme você disse ... ta buscando a ultima linha preenchida! mas e se eu alterar a planilha teria como especificar por exemplo, que o saldo anterior é sempre a celula J24 e a outra a E24??
  2. lucascabs

    VBA - Buscar Campo

    obrigado ... esse tópico poderia ate ser apagado! desculpa ae! Lucas
  3. a planilha é um controle de contas ... ta td beleza ... tudo funcionando em relação a planilha! ai vem a parte da macro, ela vai funcionar assim: toda vez que voce que clicar no botao do proximo ele vai copiar a planilha atual e criar uma outra igual, porém limpando as informações que não serão necessárias! para criar uma nova você tem que estar sempre na última plan, e cada vez que criar vai pedir pra digitar um nome novo da plan nova para não haver nomes iguais! ela vai também atualizar fórmulas de acordo com o necessário! meu problema é que eu precisava que no campo "G12" (saldo anterior d
  4. lucascabs

    VBA - Buscar Campo

    a planilha é um controle de contas ... ta td beleza ... tudo funcionando em relação a planilha! ai vem a parte da macro, ela vai funcionar assim: toda vez que voce que clicar no botao do proximo ele vai copiar a planilha atual e criar uma outra igual, porém limpando as informações que não serão necessárias! para criar uma nova você tem que estar sempre na última plan, e cada vez que criar vai pedir pra digitar um nome novo da plan nova para não haver nomes iguais! ela vai também atualizar fórmulas de acordo com o necessário! meu problema é que eu precisava que no campo "G12" (saldo anterior d
  5. lucascabs

    VBA - Buscar Campo

    Boa noite, fiz uma planilha em excel e criei uma macro que copia a planilha inteira anterior e cria uma nova! ela atualiza valores em branco e algumas fórmulas! já existe uma programação feita que funciona perfeitamente ... porém preciso acrescentar mais uma coisa! eu precisava que o saldo anterior da planilha atualizasse de acordo com a plan criada! por ex. Na plan 1 (já existente) no item F15 (saldo anterior) o valor seria =Master!K94 quando eu criar uma plan (EX. Plan 2) o item F15 (saldo anterior) o valor seria ='1'!F15 e assim sucessivamente! entenderam?? eu não entendo nada de vba e
  6. meu resultado final ficou em branco! os campos ainda não aparecem mas acho que é falha da instrução sql SELECT * FROM usuarios ORDER BY codigo desc LIMIT 0, 1" ... deve ser não é???? o codigo final da pagina ficou assim: <% Dim MM_conn_STRING MM_conn_STRING = ("DRIVER={MySQL ODBC 5.1 Driver};SERVER=000.000.000.00;PORT=0000;DATABASE=x;USER=x;PASSWORD=x;") %> <% dim conn set conn = SERVER.CreateObject("ADODB.Connection") conn.Open MM_conn_STRING %> <% dim SQL, objRs, conexao,codigo,ultimocodigo,proximocodigo,id,senha,login SQL = "SELECT * FROM usuarios ORDER BY codigo desc LIM
  7. do meu jeito da isso: [MySQL][ODBC 5.1 Driver][mysqld-5.1.30-community-log]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '' at line 1 e do seu: Object required: 'DRIVER={MySQL ODBC 5' eu ate pensei que faltava esse drive na minha maquina, então coloquei no ar e persistiu o erro! o servidor é locaweb entendi cara! então na realidade eu estava usando o request.query.string para fazer esse relatorio! como não consegui e graças a ajuda do Rafael Spilki parti para esse lance do session! vou atribuir o s
  8. deu certo o que você passou! mas ta retornando erro de mysql! vou dar uma verificada depois... o erro: Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [MySQL][ODBC 5.1 Driver][mysqld-5.1.30-community-log]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '' at line 1 /html/cadastro_distancia2/relatorio_distancia.asp, line 32 a linha do erro é essa: " CA1.Source = "SELECT codigo,login, senha FROM usuarios where codigo = "&id&"" " o codigo ficou exatamente assim: <% Dim MM_conn_STRI
  9. obrigado hein cara ... Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [MySQL][ODBC 5.1 Driver][mysqld-5.1.30-community-log]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '1 codigo from usuarios ORDER BY codigo desc' at line 1 /html/cadastro_distancia2/relatorio_distancia.asp, line 15 tava qui pensando, acho q o select top não funciona no mysql tenho que usar isso: " SELECT * FROM usuarios ORDER BY codigo desc LIMIT 0, 1 "???
  10. ahh entendi, obrigado! então a variavel conexao foi declarada em outra pagina então eu declarei de novo! ficou assim: <% Dim MM_conn_STRING MM_conn_STRING = ("DRIVER={MySQL ODBC 5.1 Driver};SERVER=000.000.000.00;PORT=0000;DATABASE=x;USER=x;PASSWORD=x;OPTION=3;") %> <% dim conn set conn = SERVER.CreateObject("ADODB.Connection") conn.Open MM_conn_STRING %> <% dim SQL, objRs, conexao SQL = "Select top 1 campo_codigo from sua_tabela ORDER BY codigo desc" Set objRs = conexao.Execute(SQL ) ultimocodigo = objRs ("campo_codigo") proximocodigo = ultimocodigo + 1 id = se
  11. desculpa ae cara, não to colocando a linha! segue de novo com a linha do erro: Microsoft VBScript runtime error '800a01a8' Object required: '' /html/cadastro_distancia2/relatorio_distancia.asp, line 15 pra te ajudar, precisamente na expressão: " Set objRs = objConn.Execute(SQL) " tem que colocar assim sera : Set objRs = objConn.Execute("SQL") ??? [edit] tentei aqui fazer isso e não é porque retornou o mesmo erro! [edit]
  12. então ficou declarado: Dim sql, objRs, objconn eu fiz e deu o erro(kkk) : Microsoft VBScript runtime error '800a01a8' Object required: ''
×
×
  • Create New...