marcos_804
-
Total de itens
379 -
Registro em
-
Última visita
Tudo que marcos_804 postou
-
galera como eu faço para localizar á e substituir por á na hora de postar no banco de dados? Desde já agradeço
-
galera como eu faço para localizar á e substituir por á na hora de postar no banco de dados? Desde já agradeço
-
Galera eu gostaria de saber como faço para captura um á e substituir por ´, como quando "damos enter" que substitui por <br>. Desde já, agradeço!
-
Valeu pela ajuda! Moderadores, podem fechar o tópico!
-
SE você QUISER COMO NAQUELE SITE AQUI VAI ISSO VAI NO "HEAD" <script language=JavaScript> var i = 0; var TextNumber = 0; var TextInput = new Object(); var HelpText=""; var Text = ""; var Speed=150 var WaitSpace=" " /* PARA ACRESCENTAR MAIS MENSAGEM COPIE E COLE UMA LINHA DESTAS COLOCANDO O TEXTO NUMA ORDEM CRESCENTE*/ TextInput[0] = 'O único lugar onde você GANHA para se divertir'; TextInput[1] = "Venha fazer novos amigos..." TextInput[2] = "...num local bonito e aprazível..." TextInput[3] = "...onde você se diverte e ainda pode ganhar muitos prêmios..." TextInput[4] = "São dois endereços para o seu lazer:" TextInput[5] = "Rua dos Andradas, 1342, em Porto Alegre e" TextInput[6] = "Rua Tiradentes, 215, no Calçadão de Canoas" TextInput[7] = "De segundas a sabados a partir das 10 horas" TextInput[8] = "Domingos e Feriados a partir das 15 horas" TextInput[9] = "Venha para o MegaBingo" TextInput[10] = "Um dos melhores Bingos da América Latina" TotalTextInput =10; for (var Tomer = 0; Tomer <= TotalTextInput; Tomer++) { TextInput[Tomer]+=WaitSpace } var TimerId var TimerSet=false; function startBanner () { TimerSet=!TimerSet if (TimerSet) banner(); else kill(); } function banner() { Text=rollMessage(); TimerId = setTimeout("banner()", Speed) window.status=Text; } function rollMessage () { Wait_yn=false; i++; var CheckSpace = HelpText.substring(i-1, i); CheckSpace = "" + CheckSpace; if (CheckSpace == " ") {i++;} if (i >= HelpText.length+1) {i=0; if (TextNumber < TotalTextInput) {TextNumber++;} else {TextNumber = 0;} init();} Text = HelpText.substring(0, i); return (Text); } function init () { Text = TextInput[TextNumber] HelpText = Text; } function kill () { clearTimeout (TimerId) } </script> ISSO VAI NO "BODY", DO CONTRARIO não CARREGA AS MENSAGENS <body onLoad="startBanner();">
-
entra no site http://www.dynamicdryve.com que você encontra um monte la. OBS.: O site é todo em ingles Mensagem piscando <script language="JavaScript"> <!-- var yourwords = "Ponha a mensagem aqui!"; var speed = 150; var control = 1; function flash() { if (control == 1) { window.status=yourwords; control=0; } else { window.status=""; control=1; } setTimeout("flash();",speed); } // --> </script> O body fica assim: <body onload="flash();">
-
como posso emitir um aviso de confirmacao? Se a pessoa clicar em "ok" redireciona para uma pagina se clicar em "cancelar" redireciona pra outra Desde já agradeço!
-
Galera, estou com uma caixa de texto chata. 1.Bem, quando clica dentro dela tem que mudar a "classe", até ai tudo bem. 2.quando digita dentro dela o texto atual some, tudo bem também O ERRO! 3. eu quero que quando a pessoa digite algum texto, diferente do definido ele fique ali sempre. Se a pessoa sair da caixa de texto e voltar, seja que para corrigir alguma coisa, o texto que ela digitou some tambem. O que faço para mudar isso? <input name='nomefrom' type='text' size='30' onFocus="this.className='caixa';this.value='';if(this.value==' Mundo Marcos')this.value=''; " onblur="if(this.value=='')this.value=' Mundo Marcos'; " value=" Mundo Marcos" >
-
Galera se alguém souber, por favor me diga!
-
Nãon não é isso. O codigo que você postou ele captura um pagina html e o que eu queria é poder criar em ASP (template), um pagina que pegasse informacoes do banco de dados e criasse uma pagina em HLML.
-
continuando... Já que não tem nenhum gratis para envio de email, tem algum servidor baratinho para envio de email? Ou melhor, o uso do cdonts? ........................................................................................................................
-
a dificuldade é justamente criar as paginas HTML. Pois o codigo que tem no meu livro da erro. e não é o servidor o qual estou tentando, pois já testei em 3 diferentes! quero criar as paginas HTML de informacoes vindas de um banco de dados!
-
Galera, ultimamente o que eu tenho visto é que os grandes sites estao usando a tecnologia ASP para gerar paginas HTML, isso é nada mais nada menos que um template. Comprei um livro onde tem um unico codigo de tempate, mas o bicho não da certo. Será que alguém sabe onde eu possa encontrar um codigo de TEMPLATE. desde já agradeço!
-
EITA , QUE "DEDO" AFIADO O DO MODERADOR, MAS TUDO BEM! O CHATO É QUE O NEGOCIO NÃO APRESENTA NEHUM ERRO, FALA QUE INSERIU, MAS É TUDO MENTIRA ONDE ACHO QUE DÁ O ERRO EU POSTEI EM VERMELHO, MAS ESTE FORUM não O POS, POR ISSO AQUI VAI ONDE EU ACHO QUE DEVE ESTAR ERRADO <% For gravar = 1 to parcelas data = vencD & " / " & vencM + gravar & " / " & vencA NNParcela = gravar SQL = "INSERT INTO clientes (cliente, livro, preço, pedido, Pparcela, situacao, parcelas, data, NParcela, complemento)" SQL = SQL & "VALUES ('"& cliente &"','"& livro &"','"& preço &"','"& pedido &"','"& Pparcela &"','"& situacao &"','"& parcelas &"','"& data &"', '"& NNParcela &"', '"& complemento &"')" Set Inerindo = marcos.Execute(SQL) Next %
-
CADE OS MODERADORES DO FORUM??????????????
-
Galera, eu to tentando fazer um sistema de clientes que cria varias parcelas, mas o negocio não grava no bando de dados, o que poderia fazer para ele gravar. A linha que eu acho que esta errada vai ai, mas o pior que a merda na iforma nenhum erro!! Eis, a questao, nenhum erro aqui o link, para verem que não da erro! http://i.1asphost.com/teajudo/cliente/clie...ere_cliente.asp
-
a isso não é mesmo, pois o negocio busca, mas para na primeira que encontra. E olha so, eu to usando uma "request.querystring" logo posso tem um milhao de paginas numa so, ou seja aquela pagina chama uma outra string que ta dentro dela. Mas sera que alguém pode me ajudar, pelo amor de DEUS!!
-
Galera como faço para o negocio buscar pelo bd inteiro, pois o negocio busca, encontra um e pára. Como fazer para isso não acontecer? </body> </html>
-
OLÁ MODERADORES, POR FAVOR "DEÊM UMA LUZ" AÍ. EU SEI DO POTENCIAL DE VOCÊS... !!! AGUARDO !!!!!!!!!!1
-
GALERA, SERÁ QUE ninguém VAI ME RESPONDER UMA DUVIDA BOBA DESTAS ( MAS QUE POREM EU não CONSIGO RESOLVER). JÁ VI DUVIDAS PIORES SENDO RESPONDIDAS AQUI NO FORUM ......AGUARDO RESPOSTA.........
-
OLÁ, GALERINHA TUDO BEM? eSTOU AQUI DE VOLTA POIS TO COM UM PROBLEMA MÉDIO. estou COM UM CÓDIGO DE PAGINAÇÃO, MAS EU QUERIA QUE A PAGINA ATUAL, OU SEJA AQUELA QUE ESTEJA SENDO EXIBIDA FIQUE DESLINKADA OU INATIVA. TAMBÉM GOSTARIA DE SABER COMO FAÇO PARA EXIBIR APENAS 5 PÁGINAS POR VEZ ABAIXO VAI O CODIGO <% Response.Buffer = True %> <% Dim adoCon Dim rs Dim strCon Dim strAccessDB Dim strSQL Dim strPreviousPollQuestion Dim intPreviousPollQuestionID Dim dtmPreviousPollQuestionDate Dim intRecordPositionPageNum Dim intRecordLoopCounter Const intRecordsPerPage = 2 If Request.QueryString("PaginaAtual") = "" Then intRecordPositionPageNum = 1 Else intRecordPositionPageNum = CInt(Request.QueryString("PaginaAtual")) End If %> <html> <head> <title>TESTE DE PAGINAÇÃO</title> <style> a{color:#ff0000;text-decoration:none} a:hover{padding-left:3;color:#336699;text-decoration:underline} </style> </head> <body bgcolor="#ffffff" style="font-family: verdana; font-size: 12"> <div align="center"> <span style="font-family:verdana;font-size:17;font-weight:bold;color:#336699">Teste Do Livro</span> <table width="370" border="0" cellspacing="0" cellpadding="1"> <% strAccessDB = "banco" Set adoCon = Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") 'Abre conexao com o banco de dados strCon="DRIVER={Microsoft Access Driver (*.mdb)};" strCon = strCon & "DBQ=" & Server.MapPath(strAccessDB) strSQL = "SELECT * FROM banco ORDER By id DESC" rs.Open strSQL, strCon, 3 TotalDEGravacoes = rs.RecordCount TotalDePaginas = int(TotalDEGravacoes/intRecordsPerPage) If TotalDEPaginas MOD intRecordsPerPage <> 0 Then TotalDEPaginas = TotalDePaginas + 1 end if rs.PageSize = intRecordsPerPage If NOT rs.EOF Then rs.AbsolutePage = intRecordPositionPageNum For intRecordLoopCounter = 1 to intRecordsPerPage 'If there are no more previous Poll Question records left to display then exit loop If rs.EOF Then Exit For Response.Write "<tr>" Response.Write "<td width=""250"">Nome: <b>" & rs("nome") & "</b></td></tr><tr>" Response.Write "<td width=""120"" align=""right"">Email: <b></td><td><a href=""mailto:" & rs("email") & """>" & rs("email") & "</a></b></td>" Response.Write "</tr>" 'Move to the next record rs.MoveNext Next %> </table> <br> <table width="370" border="0" cellspacing="1" cellpadding="1" align="center" height="21" style="font-family: verdana; font-size: 12"> <tr align="center"> <td align="left" width="83"> <% 'If the previous Poll Question Titles page number is higher than page 1 then display a back link If intRecordPositionPageNum > 1 Then Response.Write " <a href=""vira_pagina(1).asp?PaginaAtual=" & intRecordPositionPageNum - 1 & """ target=""_self""><< Prev</a>" End If %> </td> <td width="201"> <% 'If there are more previous Poll Question Titles to display then add a title to the other pages If intRecordPositionPageNum > 1 or NOT rs.EOF Then Response.Write " Pagíginas de dados" End If %> </td> <td align="right" width="76"> <% 'If it is Not the End of the previous Poll Question Titles entries then display a next link for the next previous Poll Question Titles page If NOT rs.EOF then Response.Write " <a href=""vira_pagina(1).asp?PaginaAtual=" & intRecordPositionPageNum + 1 & """ target=""_self"">Next >></a>" End If 'Reset Server Objects Set adoCon = Nothing rs.Close Set rs = Nothing %> </td> </tr> </table> [B]'AQUI É ONDE GERA A PAGINAÇÃO, GALERA[/B] [COLOR=red]<% For Paginass = 1 to TotalDEPaginas If Paginass <> request.querystring("PaginaAtual") then Response.Write "<a href=""vira_pagina(1).asp?PaginaAtual=" & Paginass & """>" end if Response.Write " | " & Paginass & " | " If Paginass <> request.querystring("PaginaAtual") then Response.write "</a>" end if Next %>[/COLOR] </div> </body> </html> AGRADEÇO DESDE JÁ!!
-
Isso foi o que eu tentei fazer, mas nem neste código nem no que ele chama encontrei os cockies
-
GALERA, DIGO DESDE JÁ, ESTE CÓDIGO NÃO FOI FEITO POR MIM, POR ISSO A MALDITA DÚVIDA. COMO POSSO FAZER PARA NÃO ENVIAR COOKIES AO CLIENTE E COM ISSO PERMITI-LO VOTAR MUITAS VEZES?
-
Que site massa! VALEU mesmo o link!
-
Value aí "Irmãozinho"! O seu código está demais....