Ir para conteúdo
Fórum Script Brasil

victormartins

Membros
  • Total de itens

    1.002
  • Registro em

  • Última visita

Tudo que victormartins postou

  1. faz assim cria um documento chamado, vai qualquer nome por ex: desbloquear.js dentro desse arquivo coloque isso: //v1.0 //Copyright 2006 Adobe Systems, Inc. All rights reserved. function AC_AddExtension(src, ext) { if (src.indexOf('?') != -1) return src.replace(/\?/, ext+'?'); else return src + ext; } function AC_Generateobj(objAttrs, params, embedAttrs) { var str = '<object '; for (var i in objAttrs) str += i + '="' + objAttrs[i] + '" '; str += '>'; for (var i in params) str += '<param name="' + i + '" value="' + params[i] + '" /> '; str += '<embed '; for (var i in embedAttrs) str += i + '="' + embedAttrs[i] + '" '; str += ' ></embed></object>'; document.write(str); } function AC_FL_RunContent(){ var ret = AC_GetArgs ( arguments, ".swf", "movie", "clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" , "application/x-shockwave-flash" ); AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs); } function AC_SW_RunContent(){ var ret = AC_GetArgs ( arguments, ".dcr", "src", "clsid:166B1BCA-3F9C-11CF-8075-444553540000" , null ); AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs); } function AC_GetArgs(args, ext, srcParamName, classid, mimeType){ var ret = new Object(); ret.embedAttrs = new Object(); ret.params = new Object(); ret.objAttrs = new Object(); for (var i=0; i < args.length; i=i+2){ var currArg = args[i].toLowerCase(); switch (currArg){ case "classid": break; case "pluginspage": ret.embedAttrs[args[i]] = args[i+1]; break; case "src": case "movie": args[i+1] = AC_AddExtension(args[i+1], ext); ret.embedAttrs["src"] = args[i+1]; ret.params[srcParamName] = args[i+1]; break; case "onafterupdate": case "onbeforeupdate": case "onblur": case "oncellchange": case "onclick": case "ondblClick": case "ondrag": case "ondragend": case "ondragenter": case "ondragleave": case "ondragover": case "ondrop": case "onfinish": case "onfocus": case "onhelp": case "onmousedown": case "onmouseup": case "onmouseover": case "onmousemove": case "onmouseout": case "onkeypress": case "onkeydown": case "onkeyup": case "onload": case "onlosecapture": case "onpropertychange": case "onreadystatechange": case "onrowsdelete": case "onrowenter": case "onrowexit": case "onrowsinserted": case "onstart": case "onscroll": case "onbeforeeditfocus": case "onactivate": case "onbeforedeactivate": case "ondeactivate": case "type": case "codebase": ret.objAttrs[args[i]] = args[i+1]; break; case "width": case "height": case "align": case "vspace": case "hspace": case "class": case "title": case "accesskey": case "name": case "id": case "tabindex": ret.embedAttrs[args[i]] = ret.objAttrs[args[i]] = args[i+1]; break; default: ret.embedAttrs[args[i]] = ret.params[args[i]] = args[i+1]; } } ret.objAttrs["classid"] = classid; if (mimeType) ret.embedAttrs["type"] = mimeType; return ret; } e na pagina coloque assim: <script type="text/javascript"> AC_FL_RunContent( 'codebase','http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,24,0','width','779','height','135','src','logo','quality','high','pluginspage','http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash','movie','logo','wmode','transparent' ); //end AC code </script><noscript><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,24,0" width="779" height="135"> <param name="movie" value="logo.swf"> <param name="quality" value="high"> <param name='wmode' value='transparent'> <embed src="logo.swf" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="779" height="135" ></embed> </object></noscript> Substitua td o que precisar na pagina, o tamanho, menu e etc... Esqueci pra voce colocar na pagina o script você faz assim: <script src="desbloquear.js" type="text/javascript"></script>
  2. vê se voce esta utilizando texto dinamico (Dynamic Text), se estiver o efeito Alpha não funciona mesmo
  3. coloca o HTML na mesma pasta do Flash
  4. Eu também utilizo o Flash 8 e funciona corretamente
  5. eu tenho esse problema numa animação que eu fiz também, as vezes a animacao fica certa e as vezes a animacao fica lenta e o som fica normal
  6. E se voce quiser que quando o mouse passe por cima ele para é só usar isso: <marquee direction="left" scrollAmount='4' onmouseover="this.stop()" onmouseout="this.start()" align="center" scrollamount="5" width="500" behavior="alternate"> Texto aqui</marquee>
  7. Da uma diminuida na resolução das fotos, estao muito pesadas! E olha que tenho 2 MB de velocidade
  8. Tente usar assim: É javascript Javscript function GenerateNoisy(value) { document.getElementById('hidGenerateNoisy').value = 'false'; } function SetImage(index) { path = document.getElementById('imgPequena' + index).src; path = path.replace('pequena', 'grande'); document.getElementById('imgPrincipal').src = path; } pagina.htm <table width="289" height="400" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="289" valign="top"><font size="1"><br></font> <div align="center"><img src="carros/m_221.jpg" id="imgPrincipal" border="1"><input name="hidFotoSelecionada" id="hidFotoSelecionada" type="hidden" /> <font size="1"></font></div> <table cellSpacing="0" cellPadding="0" border="0" bordercolor="#000000" align="center" bgcolor="#ffffff" style="border:1px solid #000000"> <tr> <td width="82" height="62"> <img id="imgPequena1" onClick="SetImage('1');" onMouseOver="this.style.cursor='hand';" onMouseOut="this.style.cursor='';" src="carros/m_222a.jpg" alt="" border="0" style="height:62px;width:90px;" /> </td> <td width="82" height="62"> <img id="imgPequena2" onClick="SetImage('2');" onMouseOver="this.style.cursor='hand';" onMouseOut="this.style.cursor='';" src="carros/m_223.jpg" alt="" border="0" style="height:62px;width:90px;" /> </td> <td width="82" height="62"> <img id="imgPequena3" onClick="SetImage('3');" onMouseOver="this.style.cursor='hand';" onMouseOut="this.style.cursor='';" src="carros/m_221.jpg" alt="" border="0" style="height:62px;width:90px;" /> </td> </tr> </table>
  9. crie uma imagem trasparente e use uma div com um link nela e posiciona em cima do flash
  10. victormartins

    Download

    Da uma procurada no forum de ASP, porque eu lembro que eu já postei para um cara para forçar download Achei o que eu tinha postado <% 'mostra via servidor que o response.addheader será aplicado para download response.AddHeader "Content-Type","application/x-msdownload" 'mostramos o arquivo que será feito o download, independente de sua extensão 'usaremos no exemplo: arquivo.pdf response.AddHeader "Content-Disposition","attachment; filename=arquivo.pdf" Response.Flush Response.Buffer = True Const adTypeBinary = 1 'leremos abaixo o arquivo em modo binário através do ADODB Set binario = Server.CreateObject("ADODB.Stream") binario.Open binario.Type = adTypeBinary 'Informe aqui o caminho completo do arquivo no servidor ' Se preferir, use Server.MapPath("arquivo.pdf") binario.LoadFromFile Server.MapPath("arquivo.pdf") Response.BinaryWrite binario.Read binario.Close Set binario = Nothing Response.Flush %> ATENÇÃO, ISSO é ASP
  11. victormartins

    Componente De Template

    pagina.asp <!--#include file="arquivo.htm"--> Seria isso?
  12. victormartins

    Sistema De Noticia !

    Vo te dar uma ajuda e das boas: <!--#include file="config.asp"--> <table border="1" cellpadding="4" cellspacing="0" width="363" bordercolor="#000000" align="center"> <tr> <td bgcolor="#FFFFFF" width="363"> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td> <table width="98%" cellpadding="0" cellspacing="0" align="center"> <% sqlstmt = "SELECT * FROM noticias ORDER BY id DESC" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sqlstmt, Dados, 3, 3 TotalRecs = rs.recordcount x = 0 For x = 1 to 9999 If rs.eof then Exit For Else date1 = rs("data") id = rs("id") name1 = rs("titulo") link = "<a href='view.asp?id=" & id & "' class='g'>" & name1 & "</a>" description = name1 %> <tr> <td height="2" valign="top"><font face="Geneva, Arial, Helvetica, san-serif" size="2"> <img src="Imagens/apontar.gif"> <%=rs("data")%> - <% =link%> </font> </tr> <% rs.MoveNext End If Next rs.close%> </table></td> </tr> </table> </td> </tr> </table> Esse cod eu fiz pra exibir as noticias de um site de um cliente meu E ESTUDE MAIS SOBRE ASP!
  13. Tenho um indique este site na pagina do meu cliente, só que fiz em CDONT, e vi que não estava funcionado na pagina, depois de analizar com muita calma vi que o servidor não da suporte para CDONT, agora quero passar para ASPMail ou ASPEmail, alguém pode me ajudar? indique.asp <!--#include file="../hora.asp"--> <% dim useraction useraction = request("action") select case useraction case "login" seunome = request.form("seunome") seuemail = request.form("seuemail") nomeamigo = request.form("nomeamigo") emailamigo = request.form("emailamigo") nomeamigo = request.form("nomeamigo1") emailamigo = request.form("emailamigo1") nomeamigo = request.form("nomeamigo2") emailamigo = request.form("emailamigo2") Set objCDO = Server.CreateObject("CDONTS.NewMail") htmlemail = htmlemail & "<font face=Verdana size=2><strong><font size=2>" htmlemail = htmlemail & "<p><font face=Verdana color=#000080>Olá </font><i><font " htmlemail = htmlemail & "face=Verdana color=#FF0000>" & nomeamigo & "</font></i><font face=Verdana color=#000080>!<br>" htmlemail = htmlemail & "<br>" htmlemail = htmlemail & "O seu amigo " & seunome & " entrou no site da e convidou você para visitar o site também!</font></font></strong></font></p>" htmlemail = htmlemail & "<br>" htmlemail = htmlemail & "<p><strong><font size=2 color=#000080><font face=Verdana>O site da , é um site onde você encontra muitas coisas!.</font><br><br>" htmlemail = htmlemail & "<font face=Verdana>Atenciosamente,<br>" htmlemail = htmlemail & "</font></font><i><font face=Verdana size=2 color=#000080>&nbsp;" htmlemail = htmlemail & "- <br>" htmlemail = htmlemail & "&nbsp;</font><a href=www.site.com.br><font face=Verdana size=2 color=#000080>www.site.com.br</font></a></i></strong></p>" objCDO.To = emailamigo objCDO.From = seuemail objCDO.Subject = "Visite nosso site!" objCDO.Body = htmlemail objCDO.MailFormat = 0 objCDO.Bodyformat = 0 objCDO.Send response.redirect "indique2.asp" end select %> <html> <head> <title>Indicação</title> <script src="Scripts/AC_RunActiveContent.js" type="text/javascript"></script> <link href="css.css" rel="stylesheet" type="text/css"> </head> <body topmargin="0" leftmargin="0" bgcolor="#EEF5FB"> <table width="100%" cellpadding="0" cellspacing="0" style="border: 2px dotted #000000"><td bgcolor="#0099CC" align="center"><strong><b><font size="4" color="#ffffff" face="Arial, Helvetica, sans-serif">Preenchendo este formulário, você estará indicando o site da Igreja Metodista Wesleyana aos seus amigos.<br><img src="../imagens/titulo_novoJC3.gif"></font></b></strong></td></table> <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td width="100%" height="2" bgcolor="#000000"><img src="imagens\SEPARADOR.gif" width="1" height="2"></td> </tr> <tr> <td background="../imagens/bg_02.jpg" height="13"> <div align="center"><b><font face="Arial, Helvetica, sans-serif" size="1" color="black"> <%=mensagemtempo%> <%=data_hoje%> </font></b></div> </td> </tr> <tr> <td width="753" height="2" bgcolor="#000000"><img src="imagens\SEPARADOR.gif" width="1" height="2"></td> </tr> </table> <br><form name="theform" action="indique.asp?action=login" method="post"> <div align="center"> <center> <table bgcolor="#39597D" width="333" height="30"> <tr><td width="117" height="1" bgcolor="#FFFFFF"><b><font color="#39597D" size="2" face="Arial">Seu Nome:</font></b></td> <td width="204" height="1" bgcolor="#FFFFFF"><input type="text" name="seunome" size=31 class="txtbox"></td></tr> <tr><td width="117" height="0" bgcolor="#FFFFFF"><b><font color="#39597D" size="2" face="Arial">Seu E-mail:</font></b></td> <td width="204" height="0" bgcolor="#FFFFFF"><input type="text" name="seuemail" size=31 maxlength=30 class="txtbox"></td></tr> <tr> <td width="117" height="25" bgcolor="#FFFFFF"><b><font color="#39597D" size="2" face="Arial">Nome do Amigo:</font></b></td> <td width="204" height="25" bgcolor="#FFFFFF"><input type="text" name="nomeamigo" size=31 maxlength=30 class="txtbox"></td> </tr> <tr> <td width="117" height="25" bgcolor="#FFFFFF"><b><font color="#39597D" size="2" face="Arial">E-mail do Amigo:</font></b></td> <td width="204" height="25" bgcolor="#FFFFFF"><input type="text" name="emailamigo" size=31 maxlength=30 class="txtbox"></td> </tr> <tr> <td width="117" height="25" bgcolor="#FFFFFF"><b><font color="#39597D" size="2" face="Arial">Nome do Amigo:</font></b></td> <td width="204" height="25" bgcolor="#FFFFFF"><input type="text" name="nomeamigo1" size=31 maxlength=30 class="txtbox"></td> </tr> <tr> <td width="117" height="25" bgcolor="#FFFFFF"><b><font color="#39597D" size="2" face="Arial">E-mail do Amigo:</font></b></td> <td width="204" height="25" bgcolor="#FFFFFF"><input type="text" name="emailamigo1" size=31 maxlength=30 class="txtbox"></td> </tr> <tr> <td width="117" height="25" bgcolor="#FFFFFF"><b><font color="#39597D" size="2" face="Arial">Nome do Amigo:</font></b></td> <td width="204" height="25" bgcolor="#FFFFFF"><input type="text" name="nomeamigo2" size=31 maxlength=30 class="txtbox"></td> </tr> <tr> <td width="117" height="25" bgcolor="#FFFFFF"><b><font color="#39597D" size="2" face="Arial">E-mail do Amigo:</font></b></td> <td width="204" height="25" bgcolor="#FFFFFF"><input type="text" name="emailamigo2" size=31 maxlength=30 class="txtbox"></td> </tr> </table> </center> </div> <p align="center"> <input type="reset" value="Limpar" class="bot"> <input type="submit" value="Enviar" class="bot"></p> </form> <!--#include file="../baixo.asp"--> </body> indique2.asp <% seunome = request.form("seunome") seuemail = request.form("seuemail") nomeamigo = request.form("nomeamigo") emailamigo = request.form("emailamigo") nomeamigo = request.form("nomeamigo1") emailamigo = request.form("emailamigo1") nomeamigo = request.form("nomeamigo2") emailamigo = request.form("emailamigo2") Set objCDO = Server.CreateObject("CDONTS.NewMail") htmlemail = htmlemail & "<font face=Verdana size=2><strong><font size=2>" htmlemail = htmlemail & "<p><font face=Verdana color=#000080>Olá </font><i><font " htmlemail = htmlemail & "face=Verdana color=#FF0000>" & seunome & "</font></i><font face=Verdana color=#000080>!<br>" htmlemail = htmlemail & "<br>" htmlemail = htmlemail & "Agradece à você por indicar o nosso site e queremos dizer que a indicação foi enviado com sucesso para " & nomeamigo & "!</font></font></strong></font></p>" htmlemail = htmlemail & "<br><br>" htmlemail = htmlemail & "<font face=Verdana>Atenciosamente,<br>" htmlemail = htmlemail & "</font></font><i><font face=Verdana size=2 color=#000080>&nbsp;" htmlemail = htmlemail & "<br>" htmlemail = htmlemail & "&nbsp;</font><a href=http://www.site.com.br><font face=Verdana size=2 color=#000080>www.site.com.br</font></a></i></strong></p>" objCDO.To = seuemail objCDO.From = "contato@site.com.br" objCDO.Subject = "Visite nosso site!" objCDO.Body = htmlemail objCDO.MailFormat = 0 objCDO.Bodyformat = 0 objCDO.Send if objCDO.Send = true then response.redirect "ok1.asp" else response.redirect "indique.asp" %> Vlw
  14. Isso não deu certo, o cod aqui: <% sqlstmt = "SELECT * FROM noticias2 ORDER BY id, data DESC" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sqlstmt, Dados, 3, 3 TotalRecs = rs.recordcount x = 0 For x = 1 to 9999 If rs.eof then Exit For Else date1 = rs("data") id = rs("id") name1 = rs("titulo") link = "<a href='view.asp?id=" & id & "' class='g'>" & name1 & "</a>" description = name1 %> não sei c você entendeu errado, mas tipo tenho um sistema de noticia e eu queria que ele ordenasse não ordem certa, quando eu adicionasse ele colocasse o ultimo que eu adicionei em primeiro e quando eu add ele coloca o outro que eu adcionei em baixo do primeiro
  15. Se usa, muitos sites usam ainda, se você olha bem ate o Google usa
  16. victormartins

    Tag <input>

    Da uma procurada no forum que você encontra como fazer conexao com o bd e como procurar
  17. Na exibicao de noticias eu queria que fosse da ultima id para baixo, entenderam?? eu fiz assim: ORDER BY id, data DESC só que ele exibe de cima para baixo e eu queria que fosse de baixo para cima, Ele está fazendo assim: Exibe de 1, 2, 3, 4, 5, 6 E eu quero assim 6, 5, 4, 3, 2, 1 é só um exemplo isso. Entenderam?
  18. Da uma procurada no Google que você acha o Trial
  19. como se fosse personagens, entendeu? Tipo animações com personagens só que no flash e não em sequencia de imagens, tipo no site da Jorge Alex lá tem umas mulheres desfilando, aqui ó: http://www.jorgealex.com.br/site/home/ da pra entender?
  20. Como é que faz aqueles desenhos no flash que fica super leve que nem tem no site www.charges.com.br , alguém tem um tutorial algo de como fazer? Vlw
  21. Tem como o select option com o link abrir a pagina no iframe??? <select onChange="location = options[selectedIndex].value"> <option value="e.asp" target="frame" select>Selecione um mês</option> <option value="dez05.asp" target="frame">Dezembro/2005</option> <option value="out05.asp" target="frame">Outubro/2005</option> <option value="jun05.asp" target="frame">Junho/2005</option> <option value="abr01.asp" target="frame">Abril/2001</option> <option value="mar01.asp" target="frame">Março/2001</option> </select> Como se fosse isso ai que eu postei só que o target não funciona
  22. Funcionou, mas como no notebook do meu pai funciona sem isso?
×
×
  • Criar Novo...