[ GuTo ]

Ae galera. Vejam o que vocês acham deste layout! Fiz ele bem light e só como apresentação dos meus outros sites :lol: :lol: Eu tenho q mecher no resto ainda, mas com tempo eu vou fazendo cada um. Aliás, eu ando tentando aprender ASP pra melhora-los um pouco! Acho q pelas cores vocês terão uma noção daonde eu tirei a idéia das cores. ;)

cara, to boquiaberto. Seu site é perfeito. Como disseram é demorado, mas é muito afu o layout. Quanto ao antigo, também é muito show! Está de parabéns!!! :D ;)

Olá Tenho um script em CDONTS meu feito por mim mesmo personalizado e funcionando maravilhosamente bem. ;) Gostaria de que quando o destinatário recebesse o e-mail, como remetemente, não aparece o e-mail dele, mas sim o NOME do remetente. Que nem no outlook, você digita um "nick" pros emails do seu catálogo... Ex. Remetente: guto Dae no caso, guto seria o email da pessoa guto@server.com, no caso suponhamos. Fui claro? E quanto a solicitar uma resposta de como lido o e-mail, tem como fazer com CDONTS? Quem souber, diga-me please!!! Obs.: O suporte da aspecto.net quando envia um email aos seus clientes sempre solicita uma mensagem de confirmação, confirmando que seu cliente leu o e-mail.

Fala galera Este desafio é mais para mim até, mas quero ver se vocês me ajudam. Isso não deve ser muito difícil, mas começo a pensar nele apartir de agora. Bem, vamos ao q interessa! Gostaria de criar um projeto de membros online. Mostraria todos os membros online na página principal, porém, teriam a opção de estarem online "invisiveis", sem aparecer o nome na página principal e outras subsequentes. Para isso, ao fazerem o login, teria um checkbox com nome de invisivel, se marcado não mostraria nenhum dado seu com online no site. Se não marcar, estará visível no site para todos que o acessem. A tabela tem e terá de ter APENAS estes campos, destes tipos, e vou dar a descrição daqueles que saberia a principio como funcionariam: - id_session - Texto - ??? - id_membro - Número - O id_membro será igual ao id do membro q está logado. Este id é retirado da tabela membros. - visivel - Sim/Não - Sim para visivel, Não pra invisivel - data - Data/Hora - ACHO q seria inserido o tempo de agora. NOW Pensei um pouco e TALVEZ não seria preciso usar o id_session e nem o data na tabela... Mas vamos ver com ajuda de vocês se será usado ou não. Campos a MAIS na tabela não. Os outros dois são imprecindíveis (não sei se escreve assim :D ) Bem.. tá na minha hora, aula daqui a pouco... depois eu volto e continuo o post e com alguma idéia a mais e talvez com alguma coisa em asp feita. Enquanto isso gostaria de ajuda de vocês e sugestões. :P

Galera, como vocês sabem, eu estou aprendendo ASP né. Então, uma coisa é muita ruim... eu, por exemplo, estou me puxando pra fazer os ASP perfeitinhos e etc, e daí como estou aprendendo, não vale a pena pagar servidor, mas por favor né, já é o segundo código ASP q eu crio perfeitamente e não funciona no servidor da aspecto. Eu fiz um de usuários online com BD, porque não dá pra usar GLOBAL.ASA e nem FSO. E na aspecto não funfou. Me aconteceu agora também de uma página de login não funcionar do nada.. dae conferi ó código e nada, dae então fui no brinkster e testei. Dae deu. Putz, o usuários online no brinkster funfou, FSO funfou também. A unica coisa q não dá no brinkster é q não tem CDONTS. Putz, tá mals a coisa. Pelo menos uma coisa é certa, cadestre-se em vários servidores gratuitos para testar suas páginas ASP (se você não tiver o IIS ou o PWS instalado em sua máquina, como eu) porquê há diferença SIM de um servidor para outro. Claro, não esquecendo que eles deixam bem claro o que dá o e o que NÃO dá. Mas é que tem diferença mesmo naquilo que ambos dão suporte, num pode funcionar e no outro não, e vice-versa. Bem pelo menos de uma coisa eu estou satisfeito, estou aprendendo ASP legal!!! Logo estarei ajudando todo mundo aqui no fórum, tanto como os mais FERAS em ASP (não citarei nomes porque posso me esquecer de alguém).

OUTRO PROBLEMA, VEJAM: Eu quero mostrar os 5 eventos mais próximos da data de hoje... dae tow fazendo assim: DIM data_atual data_atual = Date SELECT top 5 * FROM eventos WHERE data >=#"&data_atual&"# ORDER BY data mas não sei porque agora tá mostrando 5 resultados normais; tá mostrando eventos de datas anteriores, ou seja, datas menores q a atual. Alguém sabe como ajudar? Quero mostrar datas maiores ou iguais a data_atual !!! obs.: até na consulta no acess tá mostrando assim agora

Pois é... um de meus problemas seria o do upload. Não sei asp ainda muito bem, mas acho q conseguiria talvez fazer isso, claro q de vez em quando viria aki tirar alguma dúvida... Mas quanto a um servidor gratuito q dê suporte a algum tipo de upload e ql, você conhecem? sou cadastrado nos sites gratuitos: www.aspecto.net - esse eu sei q não funciona DUNDAS upload (nem sei como é isso) www.brinkster.com www.7host.com www.domaindlx.com Só pra começar precisaria saber disso... ;) :D

Isso galera! Eu quero inserir no BD, quando o membro efetuar logout, a data e hora. Pra isso uso o now. Até aí tudo bem. O problema é que a página me parece estar correta! Mas não está... e não é reportado erro algum. Se alguém puder ajustar a página pra mim ou me dizer onde possa estar um possível erro. Sessions - quando o cara faz o login, fica gravado estas sessions: session("logado"), session("id) e session("apelido"). Se o cara tiver logado a session("logado") é então igual a 1, caso contrário (se o cara não é cadastrado ou não está logado), recebe o valor 0 (ZERO)! Na hora q ele se logar então, é capturado o seu id e apelido do BD. Sendo então session("id") = rs("id") e session("apelido") = rs("apelido"). o id pode variar de 1 até o nº do último membro cadastrado. É um campo de autonumeração. apelido é o nickname/apelido do membro cadastrado. Espero ter esclarecido possíveis dúvidas quanto ao meu problema.. Aguardo ajuda!

OLÁ GALERA quero q quando o cara realizar logout seja inserido no campo logout do registro dele a data e hora (now) do exato momento em q ele sai. fiz o código e não funciona, e não é reportado erro algum. se alguém puder consertar meu código ou me dizer aonde tá errado, porque eu procuro, procuro e não acho o erro. <% Option Explicit dim db,rs,sql dim horatempodeagora, id_logado, sql2 horatempodeagora = now id_logado = session("id") set db = Server.CreateObject("ADODB.Connection") set rs = Server.CreateObject("ADODB.Recordset") db.open "Provider=Microsoft.Jet.OLEDB.4.0;data source="& Server.MapPath("dados.mdb") sql = "SELECT * FROM membros WHERE id='"&id_logado&"' " rs.open sql,db if not rs.eof then sql2 = "UPDATE membros set logout='"&horatempodeagora&"' WHERE id='"&id_logado&"' " db.execute(sql2) 'Abaixo o código para fazer o usuario "deslogar"o que terminará a seção session.abandon 'Agora uma mensagem confirmando que foi quebrado a seção with response .write("<script language='JavaScript'>alert('Logout efetuado com sucesso.\n\nRecomende a seus amigos\n\nVolte breve');location.href='main.asp';</script>") end with response.end end if %>

Huahuahau Galerinha, eu como sempre, me superando aos pouquinhos... :D Agora pouco enviei um post né, mas já consegui resolver... Percebi num código q tinha baixando estes tempos q a cada sql declarada, o cara q fez a página, declarava também um recordset... então fiz o mesmo e consegui resolver o problema... EMBORA tenha surgido OUTRO problema... vejam... Eu quero mostrar os 5 eventos mais próximos da data de hoje... dae tow fazendo assim: SELECT top 5 * FROM eventos WHERE data >=#"&data_atual&"# ORDER BY datamas não sei porque agora tá mostrando 5 resultados normais, mas tá mostrando eventos de datas anteriores... ou seja, datas menores q a atual. Alguém sabe como ajudar? obs.: até na consulta no acess tá mostrando assim agora

eu não entendo.. antes isso funcionava, agora não funciona mais... to com quase certeza q o problema está em alguma outra parte do código se eu botar o código todo da página aki ninguém vai olhar, mas eu gostaria de pedir então a ajuda de alguém por ICQ, eu mando até o BD pra poder testar se quiser... eu preciso arrumar esta M... já tirei o asterisco, já fiz pelo for, já fiz como todo mundo disse aki.. o problema deve ser em algo no resto mesmo, eu continuarei a procuro do erro... se alguém se disponiblizar, meu icq é 322840175... mandarei a página e o q precisar mais! :angry:

como assim? pode transformar estas váriaveis num exemplo com o adress das páginas e etc... ah, pra q serve isso? request.querystring("script_name") já vi em páginas de paginação <% recebe_pagina = Request.QueryString("Cod_Pagina") Select Case "recebe_pagina" Case "Contato" Response.Write("Email Enviado") Case "Cadastro" Response.Write("Cadastro OK") Case "Enquete" Response.Write("Voto computado") Case "" Response.Write("Obrigado") End Select %> E quanto a 2ª dúvida.. você tá kerendo dizer q eu devo declarar número como números e strings como strings? ficando assim pra números: "&nomedavar&" ficando assim pra strings de numeros e/ou letras: '"&nomedavar&"' isso? já tentei isso.. axo q fiz certo, mas o erro este continua...

Fala Galera, estou com umas dúvidas, acho q tem como vocês me ajudarem. Quero criar uma página obrigado.asp, q dependendo da página de onde ela veio seja exibida uma msg personalizada. Ex. Caso o cara tenha submetido o form da página de contato, q em seguida foi redirecionado pra esta página obrigado.asp, então mande como resposta a ele: Seu e-mail foi enviado com sucesso; Caso o cara tenha submetido o form da página de indicação, q em seguida foi redirecionado pra esta página obrigado.asp, então mande como resposta a ele: Você indicou/recomendou nosso site com sucesso a seu amigo; Então.. todas as páginas qlqr tipo de contato assim seriam redirecionadas pra esta página obrigado, dae dependendo de onde o cara veio, exbir tal msg... tem como? seria alguma coisa como Request.ALGUMACOISA. E quanto a esta sql, tem um erro... faço a consulta no acess e funciona direito.. olhem sql="INSERT INTO membros (sexo,apelido,nome,nascimento,e_civil,cidade,uf,icq,MSN,yahoo,email,homepage,celular,telefone,sobre,titulo,nivel,senha,login,expedicao) " sql=sql&"VALUES('"&sexo& "','"&apelido&"','"&nome&"','"&nascimento&"','"&e_civil& "','"&cidade&"','"&uf&"','"&icq&"','"&MSN&"','"&yahoo&"','"&email&"','"&homepage&"','"&celular&"','"&telefone&"','" & sobre & "','"&titulo& "','"&nivel&"','"&senha&"','"&login& "','"&expedicao&"')"ERRO ALGUÉM AJUDA EU???

cria uma página asp com um form, um BD com campos q você quer (nome, msg, homepage), uma página asp q vai ser chamada por este form para enviar os dados na tabela e depois disso dá um response.redirect pra página onde tá esse form... dae na página do form você lista todas as msgs da tabela, acho que é isso. desculpe se não deu pra entender... não sei nada de asp ainda direito maninho, mas se soubesse até fazia o código e te daria... qlqr coisa tem gente aki no fórum mais capacitada q eu atualmente pra te ajudar. mas a idéia é essa! :D fiz o q pude... ;)

achu q ele quer fazer um mural de recados para colocar na sua página principal, parecido com aquele do site do tabeleza.net. não é isso?

fiz como disse jissa e continua exibindo um resultado apenas estou começando a pensar q outra parte do código possa estar influindo nessa parte... mas pode ser q não... você tem alguma idéia?

Huahuahua Ninguém vai acreditar direito, mas sabe o q tava causando o erro? O Option Explicit no início do código. Depois q retirei-o, funfou. jissa obrigado por lembrar do set objCDO = nothing coloquei agora urso.louco na aspecto.net o script funciona e enviado com sucesso o email. já no domaindlx.com, funciona mas não me lembro de ter recebido email algum, =].

pgmador mudei a sql e ficou assim sqlnoticias = "SELECT top 3 *, noticias.id AS idnoticia, noticias.data, noticias.titulo AS titulonoticia, noticias.id_autor, noticias.sobre AS sobrenoticia, membros.apelido from noticias INNER JOIN membros " sqlnoticias = sqlnoticias & "ON noticias.id_autor = membros.id ORDER BY noticias.id DESC" set rs = db.Execute(sqlnoticias) do while not rs.eof está mostrando UM resultado apenas e sem erro agora, mas quero mostrar 3 resultados.. você pode me dar uma mãozinha? obs.: eu faço a consulta sql pelo acess com esse código sql q tá aí e funciona perfeito...

<% Option Explicit dim horatempoquandoenviado, ip horatempoquandoenviado = now ip = Request.ServerVariables("REMOTE_ADDR") dim useracao useracao = request("acao") select case useracao case "contatar" apelido = request.form("apelido") icq = request.form("icq") email = request.form("email") sexo = request.form("sexo") assunto = request.form("assunto") mensagem = request.form("mensagem") Set objCDO = Server.CreateObject("CDONTS.NewMail") htmlemail = htmlemail & "<font face=Verdana size=1 color=#000000>Email enviado dia: "&horatempoquandoenviado&" pelo IP: "&ip&"</font><br><hr><br>" htmlemail = htmlemail & "<font face=Verdana size=2><p>Assunto:<font color=#FF0000>"&assunto&"</font><br><br>" htmlemail = htmlemail & "Apelido: "&apelido&"<br>" htmlemail = htmlemail & "ICQ#: "&icq&"<br>" htmlemail = htmlemail & "Email: "&email&"<br>" htmlemail = htmlemail & "Sexo: "&sexo&"<br>" htmlemail = htmlemail & "Mensagem: "&mensagem&"</font>" objCDO.To = "chatcanoas@pop.com.br" objCDO.From = apelido objCDO.Subject = assunto objCDO.Body = htmlemail objCDO.MailFormat = 0 objCDO.Bodyformat = 0 objCDO.Send response.redirect "obrigado.asp" end select %> no form<form action="contato.asp?acao=contatar" method="post" name="formulario" onSubmit="return validar(this)"> Apelido: <input type="text" size="20" name="apelido"><br> ICQ: <input type="text" size="10" name="icq"><br> E-mail: <input type="text" size="50" name="email"><br> Sexo: <select name="sexo" size="1"> <option SELECTED value=""> -- ESCOLHA UM -- </option> <option value="Feminino">Feminino</option> <option value="Masculino">Masculino</option> </select><br> Assunto: <select name="assunto" size="1"> <option SELECTED value=""> -- ESCOLHA UM -- </option> <option value="Anuncios">Anuncios</option> <option value="Criticas">Criticas</option> <option value="Duvidas">Duvidas</option> <option value="Encontros">Encontros</option> <option value="Sugestao">Sugestoes</option> <option value="Parceria">Parceria</option> <option value="Outros">Outros</option> </select><br> Mensagem:<br> <textarea rows="5" name="mensagem" cols="30"></textarea><br> <input type="submit" value="Enviar">&nbsp;<input type="reset" value="Limpar"> </form> Não é reportado erro algum, simplesmente ao submeter a página não vai... se tiver algum erro no meu código, por favor, me corrijam!!!

Consegui resolver o problema. Como já disse, meu acess é o 2000. Então colequei aquela linha "Provider...bla bla" né... Apenas troquei para aquela "Driver... bla bla" e dae deu. Não sei por que, mas td bem.

EU SABIA FAZER ISSO PELO MÉTODO DO FOR COUNT 1 TO 3 STEP 1 E PELO SELECT TOP 3 * FROM... MAS NESSE AKI TÁ DIFICIL... OLHEM E SE PUDEREM ME AJUDEM: <% sqlnoticias = "SELECT noticias.id AS idnoticia, noticias.data, noticias.titulo AS titulonoticia, noticias.id_autor, noticias.sobre AS sobrenoticia, membros.apelido from noticias INNER JOIN membros " sqlnoticias = sqlnoticias & "ON noticias.id_autor = membros.id ORDER BY noticias.id DESC" set rs = db.Execute(sqlnoticias) do while not rs.eof %><tr><td><table class="bg2" width="418" border="0" align="center" cellpadding="0" cellspacing="1"> <tr class="bg1"> <td width="25%"><%=day(rs("data"))%>/<%=month(rs("data"))%></td> <td width="367">&nbsp;<b><a href="noticia.asp?id=<%=rs("idnoticia")%>"><%=rs("titulonoticia")%></a></b></td> </tr> <tr class="bg1"> <td colspan="2" class="bg2"> <table width="130" border="0" align="left"> <tr> <td align="center"><img src="figuras\usr_<%=rs("id_autor")%>.jpg"></td> </tr> </table><%=rs("sobrenoticia")%></td> </tr> <tr class="bg2" height="18"> <td height="18" colspan="2"><table width="410" height="18" border="0" align="center" cellpadding="0" cellspacing="0" class="noticia"> <tr> <td width="295" style="border-right=#F8F9FB 1px solid;">Autor: <A HREF='perfil.asp?id=<%=rs("id_autor")%>'><%=rs("apelido")%></A> </td> <td width="115" align="right">&nbsp;<a href="noticia.asp?id=<%=rs("idnoticia")%>">Coment&aacute;rios</a><% dim comentarios_total, id_noticia id_noticia = rs("idnoticia") set rs = Server.CreateObject("ADODB.recordset") rs.open "SELECT COUNT(*) AS comentarios_total FROM noticias_comentarios where id="&id_noticia&"",db comentarios_total = rs("comentarios_total") response.write("("&comentarios_total&")")%></td> </tr> </table></td> </tr> </table></td></tr> <%rs.movenext loop%>

Meu acess é o 2000. Página hospedada na aspecto.net. Fiz uma consulta SQL pelo acess mesmo e deu certo, então a instrução SQL tá certa. Dae não sei ql é o erro ali... Um amigo meu no icq, o Tarkan (o cara é cadastrado aki), me disse pra criar ponteiros, não sei como funciona isso. Pelo q ele me disse, é akilo q o urso.louco disse: 3,3. Se alguém puder me explicar isso, ficarei grato. Quanto ao meu problema, juro q não sei ql o problema.. o engraçado é q alguns dias atrás tava funcionando.

Valeu jissa! Nunca pensei que o elseif poderia me ajudar neste caso. Imaginava que ia mandar resposta como resposta o null também! Ah, eu tinha feito algo assim também... mas diferente claro, olhe: <script language="JavaScript"> var name = prompt("Digite seu Nome", "") if (name == "" || name == "null") { document.write('Visitante'); } else { document.write('<font color=#3A6EA5><b>'+name+'</b></font>'); } </script>Mas percebi meu erro agora... eu deveria ter colocado name = null, sem as aspas!

Não sei onde tá o erro... Por favor, ajudem-me... é rapidinho...

pra mim também, :D