®HEX®
-
Total de itens
57 -
Registro em
-
Última visita
Tudo que ®HEX® postou
-
Obrigado ADL Ajudou sim e bastante... :D fiz assim... SQLt="select Voto from Voto where CodPerg="&codp&"" set Rst=conn.Execute(SQLt) Total=0 Dim Vetor(3) i = 0 while not Rst.EOF Total=Total+Rst("Voto") Vetor(i)=Rst("Voto") i = i + 1 Rst.MoveNext wend 'Depois foi so armazenar nas variaveis Valor1=Vetor(0) Valor2=Vetor(1) Valor3=Vetor(2) Resolveu meu problema... obrigado... :D
-
Boa Noite Pessoal to com um problema q é o seguinte: Esse codigo busca as informações no banco de acordo com o "codp", depois no while ele soma os valores da tabela Voto gostaria de saber como pegar cada valor da tebela voto individualmente... sei que é atraves de um vetor mas não tenho ideia de como criar esse vetor... se alguém puder me dar uma luz fico grato... SQLt="select Voto from Voto where CodPerg="&codp&"" set Rst=conn.Execute(SQLt) Total=0 while not Rst.EOF Total=Total+Rst("Voto") Rst.MoveNext Wend desde já agradeço :D
-
E ae galera beleza Primeiramente quero agradecer aqueles q avaliaram os meus trabalhos anteriores pois graças a voces estou progredindo cada vez mais trabalho novo na area. Site para Igreja Evangelica Assembleia de Deus avaliem por favor. Layout
-
Ola Galera tudo beleza, Tenho que desenvolver um site com uma função que mostra ao usuario a que velocidade de conexao ele esta acessando, seria algo tipo nesse site, q você inicia o processo e ele te dar a velocidade... Sera q alguém tem alguma ideia de como posso fazer isso? Ok galera e isso aew desde já agradeço
-
Cara ta meio confuso, entre em contato comigo pelo MSN que posso te dar uma força... estou online de 00:00 as 08:00 beleza
-
a variavel ip q voce esta pegando e numerico? se for faça assim: Set rs = conn.execute("Select * From cadastro where perlog=lembrarme AND ip=" & ip & " ") * sem aspas simples... testa ae... beleza
-
ola galera beleza... E o seguinte quero contar caracters em uma frase mas por letra... eu sei que .length ele conta todas as letras mas eu quero determinar apenas uma letra a ser contado. exemplo: quero so o "S" ScriptBrasil Fórum = 2 Caracters "s" pra voces isso deve ser bobagem mas pra mim ta osso... mas é so isso mesmo... valeu pessoal...
-
obrigado pela dica... vou tentar mudar isso!
-
Saudaçoes pessoal!!! sou programador asp, estou tentando aprender um pouco de designer... Avaliem este site que eu fiz para uma LAN HOUSE valeu galera... SystemsFox - Lan House
-
Ola amigo num precisa alterar o nome do campo so o valor... faz assim: <form action="pagina.asp"> <%while not Rs.EOF%> <input type="checkbox" name="box" value="<%=Rs("ID")%>"> <%Rs.MoveNext wend%> </form> pagina.asp FOR nI = 1 to request("box").count SQL="delete * from news where ID_news="&request("box")(nI)&"" set Rs=conn.Execute(SQL) tenta ai e vê se é isso mesmo...
-
<!-- Escrito por Edson Marco Ferrari Junior edmafer@itasoa.com.br http://www.itasoa.com.br 05 de fevereiro de 2004 Este é um código em JavaScript que ira fazer a contagem e a mostrará em tempo real no browser para o usuário quantos caracteres restam para ele digitar antes do limite, e não deixará que o usuário digite mais caracteres além do especificado. É um código interessante para quem tem um campo textarea no seu form e quer limitar a quantidade de caracteres. --> <html> <head> <title> Contagem de caracteres - 05/02/2004 - Edson Marco Ferrari Junior - www.itasoa.com.br </title> <head> <body onLoad= "document.formulario.comentario.focus()"> <!-- O onLoad ai é só para o cursor já estar no campo textarea quando o browser terminar de carrgar a página. O que deve ser alterado ai no caso é: » formulario = ao nome do form » comentario = nome do textarea --> <form method="post" action="" name="formulario"> <table width="100%"> <tr> <td align="center"> <textarea rows= "5" cols= "40" name="comentario" onkeyup="textCounter(this.form.comentario,this.form.charRestantes,202);" onkeydown="textCounter(this.form.comentario,this.form.charRestantes,202);"> </textarea> </td> </tr> <!-- Vamos as explicações: como já havia dito antes, comentario é o nome do campo textarea e formulario é o nome do form. textCounter é o nome da função que veremos mais abaixo. Note que eu coloquei form e não o nome do formulário e logo após ele o nome do textarea, e charRestantes será o nome do campo text que irá exibir quantos caracteres o usuário ainda pode inserir, e 203 foi o limite estipulado por mim. --> <tr> <td align="center"> Você ainda pode digitar: <!-- Só um texto para agradar --> <input type="text" name="charRestantes" value="200" size="3" maxlength="3"> caracteres <!-- Campo que exibirá em tempo real quantos caracteres restam, não sei se você reparou, mas existe uma diferença entre o limite estipulado, e o exibido neste campo. Isto acontece por que, eu não sei, só sei que no primeiro caracter ele come 3, por ist a diferença. --> <script language="JavaScript"> //Lembre-se que este JavaScript deve estar bem abaixo dos campos <!-- function textCounter(campo, countcampo, maxlimit){ //Esta função que irá contar, mostrar e restringir o tamanho do campo if (campo.value.length > maxlimit) { //se passar do limite não deixará entrar o caracter campo.value = campo.value.substring(0, maxlimit); } else { //aqui, enquanto não se chegar ao limite, a cada caracter inserido ele reduzira -1 da contagem countcampo.value = maxlimit - campo.value.length; } } //--> </script> </td> </tr> <tr> <td align="center"> <input type="button" value="Enviar comentário"> <!-- Só para enfeitar, não serve para nada --> </td> </tr> </table> </body> </html>
-
crie um campo na sua tabela em que você colocou o usuario e a senha la no BD, com o nome de "nivel" e coloque numeros para controla-los ex: ai é so você fazer uma rotina... tipo <% If nivel='1' Then response.redirect "user1.asp" Else response.redirect "user2.asp" End If %> para identificar se os usuario e senhas estao corretos e so fazer o que o Felipe postou... mas a ideia é essa... qualquer duvida posta ai para nos podermos esclarecer melhor...
-
já desinstalei e reinstalei e reiniciei, e nada ta dando o mesmo erro: to ultilizando: >>php-4.3.10-Win32 >>Win Xp Pro >>iis 5.0 1-copio a pasta do php-4.3.10-Win32 para C: 2-renomeio ela para php 3-copiei o arquivo php.ini-dist para C:\Windows e renomeie para php.ini 4-mudei o arquivo php.ini extension_dir = "C:\php\extensions\" 5-configurei o iis e nada... perdi meu domingo inteiro tentado configurar isso da uma força ai galera isso já aconteceu com algum de vocês... isso ta me matando... valeu...
-
Ola pessoal to tendo problema em instalar o php no meu pc: Win XP Pro iis 5.0 toda vez que tento rodar uma pagina.php da essa mensagem Não foi possível encontrar o módulo especificado. e não exibe mais nada o que eu tenho que fazer para corrigir isso... desde já obrigado...
-
Saudaçoes Galera... O negocio e o seguinte criei um rotina para verificar se existe arquivos .jpg na pasta do servidos... utilizando FSO ate ai beleza... Set arq = Server.CreateObject("Scripting.FileSystemObject") arquivo = "C:\Inetpub\wwwroot\site\fotos\"&MyRs("foto") <img src="fotos/<%if arq.FileExists(arquivo) = true Then%><%=MyRs("foto")%> <%else%> <%?????%>'problema ta aqui como faço... <%end if%>"width="167" height="125" border="1"> O problema e o seguinte queria que quando o arquivo não existisse ele pulasse para a proxima foto da pasta... Desde já agradeço...
-
bem o que você quer fazer 1 exibir as fotos cujo os nomes estao em um banco de dados ou 2 fazer o upload das fotos para a pasta no servidor... explique melhor para podermos te ajudar
-
Saudaçoes galera... tenho uma duvida boba... Mas e o seguinte como faço para comentar varias linhas de codigo em asp: exemplo: 1 linha ' SQL="select * from tabela" e como faço para comentar varias linhas de codigo sem ter de ficar colocando aspas simples em uma por uma... e só isso galera valeu...
-
Caro amigo Ursolouco obrigado pela ajuda, apos horas tentando adaptar as informações que você me passou para o que eu precisava em fim consegui... ufa!!! se alguém um dia tiver a mesmo problema tai... set conn=Server.CreateObject("ADODB.Connection") conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ= " & server.mappath("BD.mdb") conn.cursorlocation=3 SQL="select Top 9 * from Tabela where foto <>' '" set Rs=conn.Execute(MySQL) Total = Rs.RecordCount Randomize Timer intRnd = Int((Total * Rnd)+0) Rs.MoveFirst Rs.Move intRnd Um abraço...
-
Em Asp e Flash eu não sei, porque você não faz em ASP e JavaScript mesmo ira funcionar perfeitamente... se tiver duvidas para montar em ASP e JavaScript posta ai que te dou uma força... beleza