Ir para conteúdo
Fórum Script Brasil

smez

Membros
  • Total de itens

    328
  • Registro em

  • Última visita

Tudo que smez postou

  1. e a mesma que estou colocando na minha connection string não sei, mas acho que e o provider do provedor, será que e isso
  2. Tem esse usuario criado na web tb, porque a minha aplicação em aspx funciona corretamente e um sistema que que eu fiz em asp da esse erro.
  3. sim esta, porque local eu consigo acessar normal , so da esse erro quando coloco a minha aplicação na web
  4. O que sera que esta acontecendo, local ele funciona e quando coloco na web não roda o banco esta em sql server e esta na web Microsoft OLE DB Provider for ODBC Drivers erro '80040e4d' [Microsoft][ODBC SQL Server Driver][sql Server]Login failed for user 'admloja'. /atendimento/admin_login.asp, line 13 da esse erro, o que será que pode ser
  5. esta trazendo o valor do banco, ex.: 4
  6. <% Set parcela = createobject("adodb.recordset") Set parcela.activeconnection = abredb SQL = "SELECT * FROM mgitu.itu_vw_condpagto WHERE cond_st_codigo='"&Session("CondPagto")&"'" parcela.open sql total = parcela("cond_in_parcelas") [color="#FF0000"]if i = total Then[/color] linha do erro i = 0 %> texto <% End If i = i +1 %> estou fazendo esse for acima , esta funcionando corretamente, mas quando tento colocar o total do I que e para trazer do banco da esse erro Microsoft VBScript runtime error '800a000d' Type mismatch /novo/sistema/pedidoAdd3.asp, line 157 o que sera que pode ser
  7. smez

    Erro no IF

    saldo = formatNumber(limite("limite"),2) totalCompra = "200,00" If totalCompra > saldo Then response.Write "não compra <br>" response.Write saldo&"<br>" response.Write FormatNumber(totalCompra,2) else response.Write "compra <br>" response.Write saldo&"<br>" response.Write FormatNumber(totalCompra,2) End iF o que esta de errado, no banco esta o valor do saldo e de 2.000,00 e o totalCompra e de 200,00 era para ele aparecer a mensagem de compra e se o totalCompra que e de 200,00 for maior que o saldo ele aparece não compra não so aparece não compra, independente do valor do saldo o que pode estar errado
  8. Microsoft JET Database Engine erro '80040e14' Erro de sintaxe na instrução INSERT INTO. /wd5/imf/fecharPedido.asp, linha 12 CdCliente = session("CdCliente") DtCadastro = Date() Status = "Ativo" abredb.Execute("INSERT INTO Orcamento (CdCliente,DtCadastro) values ('"&session("CdCliente")&"','"&DtCadastro&"'") Porque será que está dando esse erro?? os nomes dos campos estão certos??
  9. smez

    SLIDE DE IMAGEM

    so traz o link de um e todos fica com o mesmo link
  10. smez

    SLIDE DE IMAGEM

    Tenho esse script abaixo que esta criando um SLIDE DE IMAGEM usei ASP+JAVASCRIP, esta funcionando tudo certinho. Mas estou com uma dificuldade, como que eu faço para link a imagem , o jeito que eu fiz pra linkar, esta lincando, mas queria assim, cada imagem com um link especifico. Como poderei fazer isso. <% Set parceiro = createobject("adodb.recordset") Set parceiro.activeconnection = abredb SQL = "SELECT * FROM Parceiro WHERE Ativo ='Sim'" parceiro.open sql if parceiro.eof then else %> <script language="javascript"> var j,d="",l="",m="",p="",q="",z="",list= new Array(),site= new Array() <%while not parceiro.eof%> list[list.length]='parceiro/<%=parceiro("imagem")%>'; site[site.length]='<%=parceiro("link")%>'; <%parceiro.movenext wend%> j=parseInt(Math.random()*list.length); j=(isNaN(j))?0:j; document.write("<a href='"+site[j]+"' target='_blank'><img name='seqSlideShow' src='"+list[j]+"' border=0 ></a>"); function seqSlideShow(t,l) { x=document.seqSlideShow; j=l; j++; if (j==list.length) j=0; x.src=list[j]; setTimeout("seqSlideShow("+t+","+j+")",t); } </script> <script language="JavaScript"> seqSlideShow(2000,0); </script> <% end if parceiro.close set parceiro = nothing %>
  11. ta dando esse erro no meu insert <% id = request("id") con_nome = Request("nome") con_data_p = Request("data_p") con_data_e = Request("data_e") con_idioma = Request("idioma") con_link = Request("link") con_arquivo = Request("arquivo") con_arquivo2 = Request("arquivo2") con_arquivo3 = Request("arquivo3") con_arquivo4 = Request("arquivo4") con_arquivo5 = Request("arquivo5") con_ativo = Request("ativo") con_usedata = Request("usedata") con_formato = Request("formato") con_titulo = Request("titulo") con_chamada = Request("chamada") con_texto = Request("texto") con_area = Request("area") con_tipo = Request("Page") con_periodo = Request("periodo") con_ListaImagens= Request("ListaImagens") if con_idioma = "" then con_idioma = 1 end if if con_tipo = "" then con_tipo = 1 end if if con_data_p = "" then con_data_p = year(now())&"/"&month(now())&"/"&day(now()) con_data_p = FormatData2(con_data_p,1) end if if con_data_e = "" then con_data_e = year(now())&"/"&month(now())&"/"&day(now()) con_data_e = FormatData2(con_data_e,1) end if Tabela = TB_CONTEUDO_IDIOMA if Request("ativo") <> "" then con_ativo = Request("ativo") else con_ativo = 0 end if if Request("usedata") <> "" then con_usedata = Request("usedata") else con_usedata = 0 end if if Request("formato") <> "" then con_formato = Request("formato") else con_formato = 0 end if ID_CONT = GetMaxID("id_conteudo",TB_Conteudo) SQL = "Insert into "&TB_Conteudo&" (id_conteudo,str_nome,str_url,str_arquivo,str_arquivo2,str_arquivo3,str_arquivo4,str_arquivo5,int_ativo,int_usedata,data_p,data_e,id_area,int_tipo,id_user) Values(" SQL = SQL & ID_CONT&",'"&valid_sql(Request("nome"))&"','"&valid_sql(Request("link"))&"','"&valid_sql(Request("arquivo"))&"','"&valid_sql(Request("arquivo2"))&"','"&valid_sql(Request("arquivo3"))&"','"&valid_sql(Request("arquivo4"))&"','"&valid_sql(Request("arquivo5"))&"',"&valid_sql(con_ativo)&","&valid_sql(con_usedata)&",'"&FormatData2(con_data_p,DataBanco)&"','"&FormatData2(con_data_e,DataBanco)&"','"&valid_sql(con_area)&"','"&valid_sql(con_tipo)&"','"&valid_sql(session("adm"))&"')" Set RS_SQL=Conn.execute(SQL) SQL = "Insert into "&Tabela&" (id_conteudo,str_titulo,str_chamada,str_texto,int_tipo,id_idioma,id_periodo) Values(" SQL = SQL & ID_CONT&",'"&valid_sql(Request("titulo"))&"','"&valid_sql(Request("chamada"))&"','"&valid_sql(Request("texto"))&"',"&valid_sql(con_formato)&",'"&valid_sql(con_idioma)&"','"&valid_sql(con_periodo)&"')" Set RS_SQL=Conn.execute(SQL) %> como posso arrumar esse erro???
  12. Microsoft OLE DB Provider for Oracle error '80004005' Oracle client and networking components were not found. These components are supplied by Oracle Corporation and are part of the Oracle Version 7.3.3 or later client software installation. Provider is unable to function until these components are installed. MainHost = "meu ip" '------------------------------------------[ Host do Banco de Dados ] MainDSN = "meu DSN" '-------------------------------------------[ DSN do Banco de Dados ] MainBanco = "Meu Banco" '-------------------------------------------[ Nome do Banco de Dados ] MainUSER = "Usuario" ' -------------------------------------------[ LOGIN do Banco de Dados ] MainPASS = "senha" '---------------------------------------[ SENHA do Banco de Dados ] StringdeConexao = "Provider=MSDAORA.1;Password="&MainPASS&";User ID="&MainUSER&";Data Source="&MainDSN&";" Server.ScriptTimeOut = 999 application("ultimaatualizacao") = "Sexta, 06 de Julho de 2007" set abredb = Server.CreateObject("ADODB.Connection") abredb.Open(StringdeConexao) como posso arrumar esse erro??
  13. smez

    Oracle.DataAccess

    Como usaro o Oracle.DataAccess no ASP para fazer a conexão com o banco de dados ORACLE
  14. <script language="javascript"> document.write ("<marquee direction='up' height='70' scrollamount='1' scrolldelay='10' onMouseOver='stop()' onMouseOut='start()'>") var cont; cont = 1 while (cont <= 10){ document.write ("<center><a href='http://www.google.com.br' target='principal' class='link'>27-08-07 - A Ra&ccedil;a labrador foi considerada</a><br>") cont = cont + 1 } document.write ("</center></marquee>") </script> tenho esse script de java como que eu faço para ele mostrar uma noticia ficar um tempo de depois subi para outra noticia, e fica mais um tempo e depois sobe de novo,
  15. smez

    ASP + ORACLE

    não , tenho que usar uma connection string da ORACLE e a que você me passou e da Microsoft
  16. smez

    WHERE em um arquivo TXT

    Const forReading = 1, forWriting = 2, forAppending = 8 Set Fso = Server.CreateObject("Scripting.FileSystemObject") Set ObjFile = Fso.GetFile("e:\supermidia\tvacabo\programacao.txt") Set objStream = ObjFile.OpenAsTextStream(forReading,false) tenho esse script acima que esta lendo um txt como que eu faço um select assim nele SQL = "set dateformat DMY; SELECT TOP 5 * FROM vw_programacao WHERE DataInicial BETWEEN '"& vData_inicial &"' AND '"& vData_final &"' ORDER By DataFinal ASC
  17. Error Type: Microsoft VBScript runtime (0x800A000D) Type mismatch: '[string: "http://www.zilor.com"]' /clientes/biorigin/Blocos/dsp_busca_lateral.asp, line 2 if (request("id_func") <> "" and request("id_func") <> 0) then esta dando erro nessa linha o que pode ser, no SQL funciona ok no ORACLE da esse erro
  18. smez

    SELECT DISTINCT no ORACLE

    não tem INNER JOIN porque a versão do banco ORACLE que o cliente esta usando não suporta INNER JOIN
  19. tenho uma uma tabela os seguintes registros Nutrição Animal Alimentação Humana Bionis Mannvin Fermentação com esse SELECT abaixo ele funciona corretamente no SQL e traz somente o que estou precisando que é Nutrição Animal Alimentação Humana Fermentação quando vou usar o banco ORACLE ele traz tudo pra mim, como que eu faço para trazer somente esses 3 nomes?? SQL = "SELECT distinct a.id_secao, a.id_ParentID, replace(b.str_titulo,'Ingredientes Alimentícios','Alimentação Humana') as str_titulo " &_ "FROM "&TB_SECAO&" a , "&TB_SECAO_IDIOMA&" b " &_ "WHERE a.id_ParentID in(3) AND a.int_ativo = 1 AND b.id_idioma = " & idioma
  20. smez

    Erro (0x80020009)

    Bom Galera estou tento um problema, o site estava funcionando tudo ok, mas o cliente mudou o banco de dados de MSSQL para ORACLE 8.0 e depois que ele fez isso começou a dar esse erro, o que pode ser o que será que esta acontecendo??
  21. smez

    ASP + ORACLE

    Bom Dia Pessoal Estou tendo problema para fazer conexão do ASP + ORACLE estou usando o Provider NATIVO da ORACLE. StringdeConexao = "Provider=OraOLEDB.Oracle;Server=MEU SERVIDOR;Data Source=MEU BANCO;User ID=MEU USUARIO;Passoword=MINHA SENHA" Server.ScriptTimeOut = 999 application("ultimaatualizacao") = "Sexta, 06 de Julho de 2007" set abredb = Server.CreateObject("ADODB.Connection") abredb.Open(StringdeConexao) Esta dando o seguinte erro pelo que percebi o erro e o seguinte: Provedor não encontrado. É possível que ele não esteja instalado corretamente mas esta instalado corretamento o oracle e o oracle client o que será que pode ser????
  22. Microsoft OLE DB Service Components erro '80040e21' Operação OLE DB de várias etapas gerou erros. Verifique cada valor de status OLE DB. Nada foi executado. /atendimento/admin/abrebanco.asp, linha 26 Depois que eu instalei o windows vista, começou a dar esse erro como eu posso resolver isso
  23. smez

    Perdendo Session

    E isso mesmo, quando eu finalizar um pedido no meu e-commerce, ele destroi so uma session, porque se eu fazer "Session.Abandon" ele vai perder todas as session do site, mas na verdade não pode, porque quando o cliente finaliza o pedido ele vai pra tela de recibo. se eu colocar "Session.Abandon" ele não vai mostrar os dados do cliente por isso que eu preciso que destroi so uma session eu fiz assim: Session.Contents.Remove("tipoPag") e não funcionou.
  24. smez

    Perdendo Session

    tenho varias session no seu site, como que eu faço em uma determinada pagina do site ele perde so 1(uma) session.
×
×
  • Criar Novo...