
Victor
Veteranos-
Total de itens
1.756 -
Registro em
-
Última visita
Tudo que Victor postou
-
Olhe esse agora, eu esqueci de algumas coisas <% Set Conn=Server.CreateObject("ADODB.Connection") Conn.CursorLocation=3 Conn.open "DRIVER={SQL Server};DATABASE=Intranet;Network=DBMSSOCN;server=server-bd;uid=intraneti;pwd=intranet" Set RS=Server.CreateObject("ADODB.RecordSet") RS.Open sql, Conn If Not(rs.bof AND rs.eof) then For I =RS.recordcount to 1 step -1 rs.absoluteposition=I Next End If %> <% if request.form("acao") <> "" then Conn.execute "insert into tbdicasword (titulo, dica) values ('"&request.form("titulo")&"', '"&request.form("dica")&"')" else %> <form> <p><span class="style1">Título</span>: <input name="titulo" type="text" id="titulo"> </p> <p class="style2"> </p> <p class="style2">Dica: <textarea name="dica" id="dica"></textarea> </p> <p> </p> <input type="hidden" name="gravar"><input type="submit" name="gravar" value="gravar"> </form> <%end if%> Caso tanha mais dúvidas poste ai que te ajudaremos!!! []'s Victor
-
<% Set Conn=Server.CreateObject("ADODB.Connection") Conn.CursorLocation=3 Conn.open "DRIVER={SQL Server};DATABASE=Intranet;Network=DBMSSOCN;server=server-bd;uid=intraneti;pwd=intranet" Set RS=Server.CreateObject("ADODB.RecordSet") RS.Open sql, Conn If Not(rs.bof AND rs.eof) then For I =RS.recordcount to 1 step -1 rs.absoluteposition=I Next End If %> <% if request.form("acao") <> "" then Conn.execute "insert into tbdicasword (titulo, dica) values ('"&request.form("titulo")&"', '"&request.form("dica")&"')" else %> <form> <p><span class="style1">Título</span>: <input name="titulo" type="text" id="titulo"> </p> <p class="style2"> </p> <p class="style2">Dica: <textarea name="dica" id="dica"></textarea> </p> <p> </p> <input type="hidden" name="gravar"><input type="submit" name="gravar" value="gravar"> </form> <%end if%> Esse pode te ajudar melhor...Caso tenha mais alguma dúvida é só chamar que nós te ajudaremos!!! []'s Victor
-
<%if request.form("nome_da_checkbox") = "" then response.write "Você não selecionou nenhum" end if%> Saco?
-
hauhauhauhauhua Tu é mo esperto reyno
-
o replace se usa assim: request.form(replace("tatara")) Mas pode usar de outro jeito também!!! E acaso as virgulas, não ta dando erro aqui não!!! []'s Victor
-
Desisti, ta lentao
-
Eu também
-
Não entendi o modo de arquivo que você quer
-
É só você digitar no campo de texto, que ele vai gravar certinho!!! []'s Victor
-
Depende da sua conexão ao banco de dados, mas se você usar esse pode deixa assim mesmo....Só fecho conexão quando é recordset, porque ele deixa mais lento []'s Victor
-
Como assim cara, executar somento o sql??
-
Você pode fazer por cookies também..Pode ser?? []'s Victor
-
Sim dark0, ele quer aprender, ai estamos tentando explicar pra ele o maximo
-
Está respondendo alguma erro?? Se tiver posta o erro ai!!! []'s Victor
-
Tem como faxer isso em ASP sim, mas não estou lembrado como...Tem um assim No form você coloca method get assim: <form action="pagina" method="get"> Ai vai aparecer isso que voc~e quer, mas não tudo completo!!! []'s Victor
-
Você também pode usar os cookies, ai se o cara fechar a página e abrir denovo estará logado....É isso? []'s Victor
-
Conseguiu resolver seu problema ai??
-
Você quer que apareça alguma coisa do banco de dados na pagina...Certo?? []'s Victor
-
É só você colocar o outro no value também assim: conn.Execute "delete from usuarios where id = " & intDelid & " and id = " intdelid " " Caso tenha mais alguma dúvida, é só chamar que eu estarei a disposição!!! []'s Victor
-
Você quer fazer tipo de uma querystring, com os dados que tem no seu banco de dados...Certo?? []'s Victor
-
É só você usar o conn.execute...Assim: Conn.execute "insert into tabela_bd (nome, email, mensagem) values ('"&request.form("nome")&"', '"&request.form("email")&"', '"&request.form("mensagem")&"')" Caso tenha mais alguma dúvida posta ae, que te ajudaremos!!! []'s Victor
-
Sim mas você também pode fazer tudo na mesma página, ai tem um request.form que vai pegar os dados do cara que vai preencher o formulario, ai já vai enviar para o email!!! Caso tenha mais alguma dúvida posta ae []'s Victor
-
Você pode utilizar isso então: function_email.asp <% function email_cdonts(de_email, para_email, subject, mensagem) Set objmail = Server.CreateObject("CDONTS.NewMail") objmail.mailformat=0 'para enviar html como mensagem objmail.bodyformat=0 'para enviar html como mensagem objmail.from = de_email objmail.to = para_email objmail.subject = subject objmail.body = mensagem objmail.send Set objmail = nothing end function %> envio.asp call email_cdonts (request.form("email"), "email@provedor.com", "assunto", request.form("mensagem"))%> Caso tenha mais alguma dúvida, é só falar que te ajudaremos!!! []'s Victor
-
Ta bem legal, nota 8