Notax

FSO a sigla significa: File System Object e serve exatamente para manipular arquivos, diretórios e driver... É muito utilizado em e-comerce para manipular os arquivos de imagens, pastas de arquivamento e etc. Também é utilizado em outros diversos tipos de APP que precisam desse tipo de manipulação... []'s Notax

Olha che... Servidor Grátis com FSO? Acho brabo hein... todo caso... sugiro que entre em contato com esse servidor e sertifique-se quanto a liberação para uso de FSO... []'s Notax

beleza... qualquer coisa posta aí! []'s Notax

Clica com o botão direito do mouse em cima do seu botão > convert to symbol > coloque um nome marque a opção symobol > clique em ok... pronto! pode colocar actions nesse botão agora! []'s Notax

cria uma layer chamada fundo e posiciona essa layer abaixo da layer onde estão os textos! []'s Notax

Ta na mão! só tem um problema... desta forma apaga apenas um arquivo de cada vez... (mesmo se selecionar mais de um checkbox)... será que alguém sabe como aproveitar essa "sql_id" para apagar multiplos arquivos por FSO??? pesquisei por aqui e me perdi! se alguém souber será muito bem vindo! a resposta que a sql_id dá é igual a: codigo.suatabela 01 OR codigo.suatabela 02 e assim por diante... Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open "DBQ=" & Server.MapPath("bd.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password" if err = 0 and id <> "" then array_id = split(id,",") For i=0 to ubound(array_id) sql_id = sql_id & "arquivos.codigo = " & Trim(array_id(i)) & " OR " Next sql_id = left(sql_id,(len(sql_id)-4)) stringSQL = "DELETE * FROM arquivos WHERE "&sql_id&"" '-------------------deletando arquivos da pasta arquivos! Set objConn1 = Server.CreateObject("ADODB.Connection") objConn1.Open "DBQ=" & Server.MapPath("bd.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password" ComandoSQL = "SELECT * FROM arquivos WHERE "&sql_id&"" Set ObjRs = objConn1.Execute(ComandoSQL) Dim fso Set fso = Server.CreateObject("Scripting.FileSystemObject") fso.DeleteFile "c:\\domains\\wwwroot\\files\\admin\\arquivos\\"& objRS("arquivo") '-----------------------fim delete de arquivos! objConn.Execute(stringSQL) objConn.close Set objConn = Nothing if err = 0 Then objRs1.close objConn1.close Set objRs1 = Nothing Set objConn1 = Nothing []'s Notax

bareta... to tentando assim, pra aproveitar os chekbox do script do Jow... ...cont... if err = 0 and id <> "" then array_id = split(id,",") For i=0 to ubound(array_id) sql_id = sql_id & "arquivos.codigo = " & Trim(array_id(i)) & " OR " Next sql_id = left(sql_id,(len(sql_id)-4)) stringSQL = "DELETE * FROM arquivos WHERE "&sql_id&"" '-------------------deletando arquivos da pasta arquivos! Dim rs Set rs=Conexao.Execute("Select * from arquivos where "&sql_id&"") arquivo1 = rs("arquivo") Dim fso Set fso = Server.CreateObject("Scripting.FileSystemObject") fso.DeleteFile "c:\\wwwroot\\files\\admin\\arquivos\\"& arquivo '-----------------------fim delete de arquivos! objConn.Execute(stringSQL) objConn.close Set objConn = Nothing if err = 0 Then ...cont... mas não ta rolando... ele trava... apaga do bd mas não apaga do arquivo... pode dar uma força? []'s Notax

O Jow, beleza? Outra consideração... é que pelo que eu entendi (por favor me explique caso eu esteja errado) é que você no script para excluir, está deletando apenas o registro do Banco de Dados... mas pelo que eu vi nada de apagar o arquivo da pasta em que ele foi upado, correto? Como você solucionou esse problema? []'s Notax

Pessoal to editando aqui pra ficar mais facil de compreender... Tenho um form com os seguintes campos, hist1, hist2, hist3 ... até o hist10... o que eu quero é no mesmo insert incluir todos eles na coluna hist do bd... um em cada linha acompanhando respectivamente a lógica abaixo que inclui um file.name em cada linha tb... então tipo... o hist1 é referente ao primeiro file.name e assim por diante... será que rola uma força? For Each File in Upload.Files arquivo = File.FileName SET RS = Server.CreateObject("AdoDB.RecordSet") Conexao.Execute("INSERT INTO arquivos (nome,tipo,historico,arquivo) VALUES ('"& nome &"', '"& tipo &"', '"& historico &"' , '"& arquivo &"')") valeu pela atenão... []'s Notax

Existe sim como fazer isso... eu conheço duas formas ("meio gambiarrísticas") e aposto que devem ter outras... todo caso vão as que eu conheço: 1) usando frames... nesse caso sua animação em flash ficaria num frame distinto em sua página e você poderia controlar as animações das abas ou do menu pelo próprio flash... 2) Usar uma animação em flash diferente para cada página... obs.: apesar destas duas opções funcionarem eu não recomendo o uso... []'s Notax

Jú... e-commerce, apesar de muito comun nos dias de hoje, tem suas peculiaridades, particularidades e complexidades... PORÉM, se tu pegares cada "problema" e tratar ele como se fosse único verás que ficará mais fácil... e no final terás o trabalho apenas de juntar as peças... To numa correira por aqui, mas tipo... sobre global.asa... revi aqui algumas coisas que fiz no passado... global.asa não PRECISA ser usado... você pode fazer tudo sem ele tb... mas é lógico, com ele muitas vezes existe uma economia de trabalho imensa... este tipo de arquivo contém quatro eventos... e quando vistos isoladamente verás que não é tão complexo assim! Sugiro a leitura destes dois tutoriais: http://www.htmlstaff.org/ver.php?id=2512 http://www.criarweb.com/artigos/408.php []'s Notax

Limitação do server! Resolvido! valeu pela atenção! []'s Notax

Pessoal, beleza? Peguei um script que o Dark disponibilizou aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=56018 Estou tentando enviar varios arquivos ao mesmo tempo... o problema é que quando passa de um tamanho x da erro... ainda não consegui descobrir qual o tamanho exatamente... mas certamente acima de 1mb já da erro! o erro que dá é esse aqui: Request object error 'ASP 0104 : 80004005' Operation not Allowed /files/admin/upload_form2.asp, line 5 a linha 5 é essa aqui: RequestBin = Request.BinaryRead(byteCount) alguém sabe como resolver isso? []'s Notax

Sim... já tentei validar... não demonstra nenhum tipo de erro... de fato agora achei o problema... no mx não ocorria isso... não sei porque ta acontecendo isso no css... o problema está nas divs que formam o meu site... se eu tiro elas o design volta a aparecer... vou dar uma pesquisada nisso! []'s

https://www.scriptbrasil.com.br/download/codigo/2737/ []'s Notax

Pessoal, boa tarde... Instalei aqui o dreamwevear css... antes eu usava o MX... acontece que agora, sei lá eu o porque, os designs das páginas não aparecem mais... ficam tipo na imagem abaixo... notem que o os inputs que aparecem no CODE não aparecem em design... e fica aparecendo uma tag </head> em amarelo... tenho certeza que essa tag está na posição correta! o que será que pode ser isso? como é que se configura isso? tem como? valeu pela atenção. []'s Notax

Tente assim: SQL = "Select * from Agenda where id = '"& id1 &"' " []'s Notax

Caras! esquecem o que eu postei aqui... o problema não era no script... e sim naquela pecinha que fica entre o monitor e a cadeira! Esqueci apenas do importante detalhe de colocar no BD pra aceitar mais de 50 caracteres! só isso! resolveu o problema! valeu pessoal! []'s Notax

beleza... valeu raphanasc... essa parte foi... Agora... não consigo entender o porque dele não pegar todo endereço... vai bunitaço até uma parte... não pega tudo porque? não consigo entender! []'s Notax

Não... nada de frames! []'s

Pessoal, boa tarde... To tomando um laço aqui prum lance que devia ser barbadinha... rssssssssss... to querendo pegar a URL completa que aparecer na bara de endereços do navegador... quero ela completinha mesmo... daí tentei assim: login = request.QueryString("login") IF Request.ServerVariables("QUERY_STRING") <> "" THEN URL = "http://"& Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("URL") &"?"& Request.ServerVariables("QUERY_STRING") 'ELSE 'URL = "http://"& Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("URL") link = URL END IF só que não pega tudo... ex.: o endereço completo é: http://www.meudominio.com.br/pastateste/bo...ogin...continua aqui ainda... ela pega só ate essa parte http://www.meudominio.com.br/pastateste/boleto.asp?sacad onde será que eu estou errando? o que eu quero é incluir esse endereço inteiro no BD... depois que eu conseguir isso ainda preciso do mais complicado... que é sacar fora essa "pastateste/" que tem aí no endereço... será que rola? []'s Notax

Ju... beleza? A correria ta grande... mas vamos lá... tive pesquisando sobre scriptlets... estou em um projeto que vou precisar disso... de uma olhada nesses links aqui: http://www.guj.com.br/posts/list/46744.java e depois nesse aqui: http://forum.imasters.uol.com.br/index.php...mp;#entry591418 Tomara que ajude... []'s Notax

Cara... to tentando aqui... não entendi essa sugestão do Flávio, apesar de achar mais prática porque não entendo nada de ajax... indo pro caso concreto o list menu ficou assim: <input name="chcBox" type="checkbox" id="chcBox" value="ON" onclick="TrocaCampo()"> Pesquisar dados no Banco de Dados (autocompletar) Nome/ Raz&atilde;o Social <div id="text"> <input name="nome" type="text" id="nome" size="59" maxlength="59"></div> <div id="select" style="display:none"> <select name="nome" size="1"> <option value="01">SELECIONE</option> <% While not objRs.eof %> <option selected> <%response.write objRs("nome")%> </option> <% objRs.movenext wend%> </select> </div> Então, quando o cara clicar no chcBox ele escolherá no list/menu um nome e apartir desta escolha outros input se autocompletarão sozinhos... Caso ele não marque o chcBox o usuário terá que completar input um por um... Só que eu não entendi essa parte do vetor que o Flávio mencionou ai em cima... Será que rola mas alguma dica? []'s Notax

Pessoal, o David Cruvinel, moderador lá da Webly matou essa charada... pdf.CreatePDF("P","mm",[154,216]); Fica aqui a contribuição com os devidos créditos ao solucionador do problema! []'s Notax

Alguém aqui manja de FPDF? Como é que eu faço pra personalizar o tamanho de uma página? Sei que é possível, mas nem no manual explica como! Tentei assim: pdf.CreatePDF("P","mm","215, 154"); mas diz que o farmato de pagina 154 é desconhecido... já tentei tb de várias outras formas como: pdf.CreatePDF("P","mm","215", "154"); e assim por diante... nada funciona! Alguém sabe como é? []'s Notax