Himura
-
Total de itens
92 -
Registro em
-
Última visita
Tudo que Himura postou
-
po bareta se você pude me passa um que não tenha layout, eu agradeço o que eu peguei tá com muita imagen e eu quero um negócio com mais código pra estudar entende? falow
-
valeu eu peguei um codigo lá e vou testar agora valeu!
-
Obrigado a todos! Era isso mesmo Deivid, o sisteminha já ta rodando legal.... Valeu! :D
-
:blink: Alguém pode me indicar um sistema de noticias legal com adm, para eu poder me basear...
-
é isso mesmo eu acabei de consultar a documentação do asp, é lá diz que você usa o objeto application para todos os usuários que acessam sua aplicação, no caso se você quiser definir alguma coisa que será especifica pra usuários você usa o session... espero que tenha te ajudado!
-
olha para ser sincero não tenho certeza, mas, o que você quer definir só para um usuário você define em session, no servidor roda application e depois para cada usuário que se loga uma session é aberta.... eu acho que é isso qua lquer coisa alguém me corrige... Falow
-
enão qual é a função de "voto" logo após a vírgula, esta instrução faz parte de uma página asp... eu quero selevionar no campo opções somente os registros que tem por semelhança o mesmo valor em cod_questão, ou seja, quando 3 opções tiverem o mesmo valor no campo cod_questão, então a página asp irá exibir somente as 3 opções do jeito que está tá mostrando todos os registros do campo opção... vocês podem me ajudar?
-
olha cara eu tenho um sistema que registra no bd nome, email, e um comentário num campo memorando então você pode adaptar, pras suas necessidades... <%@ Language= "VBscript" %> <!-- #include file="mostra.asp" --> <html> <style type="text/css"> body {background: #000066; font:Arial, Helvetica 10px; color: white;} a:link {color: white} a:visited {color: white} a:hover {color: red} </style> <title>Comentários</title> <body> <form action="confirmacao.asp" method="post" name="oForm"> Nome: <input type="text" name="nome"> <br> E-mail: <input type="text" name="email"> <br> <br> Comentário:<br> <textarea rows="10" cols="20" name="comentarios"></textarea> <br> <br> <input type="submit" value="Enviar"> </form> </body> </html> esse código é para o cara que quer se cadastrar dar entrado nos dados... para processar os dados e jogar no bd é isso aqui... <%@ Language="Vbscript" %> <% Option Explicit %> <!-- #include file="conexaodb.asp" --> <% 'Session("nome") = Request.Form("nome") 'Session("endereco") = Request.Form("endereco") 'Session("tel") = Request.Form("tel") 'Session("email") = Request.Form("email") Sub ProcessaPagina Dim rs, piao Set rs = Server.CreateObject("ADODB.Recordset") rs.locktype=2 rs.cursortype=2 rs.open "Select top 1 * From coment", conconexao rs.Addnew for each piao in rs.fields IF Not IsEmpty(request.form(piao.name)) Then piao.value = server.htmlencode(request.form(piao.name)) 'Response.Write(Piao.Name&"="&Request.Form(piao.name)&"<br>") next 'rs.fields("nome") = Session("nome") 'rs.fields("endereco") = Session("endereco") 'rs.fields("fone") = Session("fone") 'rs.fields("email") = Session("email") rs.update end sub processapagina %> <html> <head> <style type="text/css"> h1 {font: Arial, Helvetica 25px; color: white;} body {background: #000066; font: Arial, Helvetica, 10px; color:#FFFFFF;} a:link {color: white} a:visited {color: white} a:hover {color: red} </style> <title> Form </title> </head> <body> <h4>Dados enviados com sucesso!!!</h4> <a href="comentarios.asp" hidefocus>Ver Registros </a> </body> </html> o arquivo incluido "conexão.asp" é so um arquivo padrão com conexões aos bd de to o site ... então em vez de você usar este arquivo você pode só setar a conexão no cabeçalho da própria página... espero que te ajude...
-
olha eu fiz de uma forma diferente wem uma página asp/VBscript aí segue o código: <% Option Explicit 'Criando variáveis Dim localbd, meubd, rsLogin, formlogin, formsenha 'Indicando local do Banco de dados localbd="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("../bd/bd.mdb") 'Setando conexões set meubd=server.createobject("adodb.connection") set rsLogin=server.createobject("adodb.recordset") 'Recuperando os valores do formulário e setando-os nas variáveis formlogin=request.form("login") formsenha=request.form("senha") 'Abrindo conexão meubd.Open localbd 'Verificando se possui registro rsLogin.Open "SELECT * FROM acesso where login='"& formlogin &"'", meubd 'Se não houver registro com o login digitado, ele irá voltar if rsLogin.EOF then response.write "<script>history.back(1);alert('Você não obteve acesso. Login incorreto.')</script>" 'Caso contrário, ele irá verificar a senha digitada else if rsLogin.fields("senha")=formsenha then 'Se a senha estiver correta, ele cria uma variável de sessão com o valor do login session("login")=rsLogin.fields("login") 'Redirecionamento para dentro do administrativo response.redirect "principal.asp" else 'Mas se o login está correto e a senha não, ele voltará response.write "<script>history.back(1);alert('Você não obteve acesso. Senha incorreta.')</script>" end if end if %>
-
eu tenho uma instrução sql de um exemplo e gostaria de que alguém me dissesse se ela está correta por que eu achei estranho a estrutura dela ai vai o código: SELECT * from questoes, votos where questoes.cod_questao=votos.cod_questao é possivel usar o select pra duas tabelas, separadas por vírgula?
-
localbd= "driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("bd/bd.mdb") set meubd=server.createobject("adodb.connection") set rsQuestoes=server.createobject("adodb.RecordSet") meubd.Open localbd rsQuestoes.Open "SELECT * from questoes, votos where questoes.cod_questao=votos.cod_questao", meubd %> <html> <title>Sistema de Enquete</title> <style type="text/css"> body {background: #000066} font {color:#FFFFFF; size: 2; font:Arial, Helvetica, sans-serif} a:link {color: white} a:visited {color: white} a:hover {color: red} </style> <script language="JavaScript" type="text/JavaScript"> <!-- function abrirjanela(theURL,winName,features) { //v2.0 window.open(theURL,winName,features); } //--> </script> <% 'Verificar se o voto foi feito 'Se foi, gravará uma session com a opção marcada if request.form("voto")<>"" then session("voto")=request.form("voto") response.write "<script>javascript:abrirjanela('votar.asp','Resultado','width=300,height=600')</script>" end if %> <body> <center><table width="200" border="0" cellspacing="2" cellpadding="1"> <tr> <td bgcolor="#000099"><font><b> <% 'Aqui estamos mostrando a questão da enquete response.write rsQuestoes.fields("questao")%> </b></font></td> </tr> <tr> <form name="form1" method="post" action"principal.asp"><td bgcolor="ffffff"> <table width="200" border="0" cellspacing="0" cellpadding="0"> <tr> <td><table width="200" border="0" cellpadding="0" cellspacing="0"> <% 'Criaremos uma variavel que fará com que a primeira opção fique marcada ao iniciar dim check check="checked" 'Iremos aqui utilizar o WHILE para retedir as Opções para voto while NOT rsQuestoes.EOF %> <tr> <td width="20"> <input name="voto" type="radio" value=" <% 'Aqui setaremos o valor que utilizaremos para somar o voto 'de uma determinada opção response.write rsQuestoes.fields("Cod_voto") %> " <%=check%> style="background-color:#0099FF "> </td> <td width="180" bgcolor="#0099FF"><font> <% 'Mostrar o Campo da tabela que mostrará as Opções response.write rsQuestoes.fields("opcao") %> </font></td> </tr> <% check="" rsQuestoes.movenext wend %> </table></td> </tr> <tr> <td bgcolor="#0099FF"> <div align="center"> <br> <input type="submit" name="Submit" value="votar"> <br> <br> </div></td> </tr> <tr> <td bgcolor="#000099"><div align="right"><font><a href="#" onClick="abrirjanela('resultado.asp','Resultado','width=300,height=600')" hidefocus>Ver parcial de votos</a><br> </font></div></td> </tr> </table></td> </form> só gostaria de ressaltar que esse código foi retirado de um exemplo do imasters.
-
será que ninguém pode me ajudar estou no final do expediente... é muito urgente.... me falaram que é erro lógico e que eu devo fazer uma verificação mas qual verificação? if, while o que uso?????????
-
é o seguinte este sistema é baseado em um exemplo que se encontra no imasters é um artigo publicado por Vinicius Luis.. as tabelas são: questões - com os campos: cod_questão - autonumeração questão - texto data - data e a tabela votos - com os capmpos cod_voto - autonumeração cod_questão - texto(eu acho que achei o erro) opção - texto votos - numero no exemplo do imasters tinha um sistema de comentários dentro do sistema da enquete mas deu uns erros e eu optei por usar só a enquete... se puder me ajudar agradeço.
-
Olá Tenho um sistema de enquete com um banco de dados access, as tabelas são: Votos Questões Na hora que chamo na minha página asp as opções da questão se acumulam, eu tenho duas questões mas na hora de exibe todos os registros do campo opção... não sei o q faze por favor me ajudem!!!!!!!!