ursolouco

Brother!!! Aspecto.Net!!! Acho que seja um dos melhores e em português!!! Abraços!!!

Salve Brother!! você esta recebendo esta mensagem porque você apenas selecionou todos os registro de seu banco de dados e não difiniu nenhum ponto de partida do cursor para localização do objeto. Como 'Cyber Plets' mesmo disse, você tem que passar alguma condição para iniciar a validação Ex: While Not Rs.EOF Response.Write(rs(0)) Rs.MoveNext Wend Onde: Rs = Objeto de RedorSet (Conjunto de Registros) EOF = End Of File MoveNext = Movendo o cursor para o proximo registro While / Wend = Estrutura do Looping Recomendo Brother, já que você é iniciante, fazer o cursinho de ASP do site da WebAula, que alem de gratis é excelente (na minha opinião) e procurar informações na web sobre SQL & Manipulação de dados dentro do banco de dados. Abraços!!!

Brother!! Quem esta lhe dando aula ? o Luis ou o Fernando ? Ah, mes esqueci, o Fernando é instrutor oficial e só dá aula de .Net como eu fiz, bom cara cara, se o seu internauta fechar o Browser ele estara abandonando a seção cara, e sendo desta forma dá pra você abrir a rotina da mesma forma, como se fosse Usuários OnLine. Entendeu ? Abraços e estou saindo fora, deu meu horário e vou sumindo deste trampinho... :rolleyes:

Hum... <% . .... ...... While Not Rs.EOF Response.Write (Left(Rs("Mensagem"),50) & ".....") Rs.MoveNext Veja se funciona!!! Abraços!!!

Sei lá Brother!! Mas olha ai... <% Function vUsuario() Usuario = Request.Form("usuario") uSQL = "Select Usuarios From Login Where Usuario="& Usuario &";" Set Rs = Server.CreateObject("adodb.recordset") Set Rs = Conexao.Execute(uSQL) If Rs.eof then vUsuario = False 'Não existe usuario Call vCPF Else vUsuario = True 'Existe o Usuário Response.Write("Usuario já existente em sistema!") End if End Function %> <% Function vCPF() CPF = Request.Form("CPF") cSQL = "Select CPF From Login Where CPF="& CPF &";" Set Rs = Server.CreateObject("adodb.recordset") Set Rs = Conexao.Execute(cSQL) If Rs.Eof Then vCPF = False 'Não existe o CPF Call iNovo Else vCPF = True 'CPF já usado anteriormente End if End Function %> <% Function iNovo() Set iRs = Server.CreateObject("adodb.recordset") iRs.Open("Login", Conexao, 3, 3) iRs.AddNew iRs("Usuario") = Usuario iRs("CPF") = CPF iRs.UpDate iRs.Close Set iRs = Nothing End Function %>

Brother!! você pode bolar um esquema quando o cara abandonar a session seja disparada um rotina de inclusão dentro do banco de dados.... usando o Global.Asa.

Brother!! Não me pergunta como, mas veja este script (JavaScript) que achei jogado por ai: function janela(www,h,w) { var height = window.screen.height - 160; var width = window.screen.width; var top = (height- h)/2; var left = (width - w)/2; window.open(www,"nova","top=" + top + ",left="+ left +",width="+w+",heigth="+h+",toolbar=no,location=no,status=no,menubar=no,scrollbars=yes,scrolling=yes,resizable=yes") } Abraços!!!

Salve Mineiro!! Os caras tem cada piada boba sobre os mineiros que meu amigo que estava aqui do meu lado vendo eu responder este POST me contou uma que não aguentei de dar risada..... :D , mas voltando a sua dúvida, vamos lá!! Entre aqui no Código Livre, veja qual forum melhor atende sua necessidade e depois, se houver, alguma dúvida ou problema, nos lhe ajudamos... Abraços!!!

Brother!!! <% Function Consulta_Tabela() Dim Rs, cSQL, Conexao Set Rs = Server.CreateObject("adodb.recordset") cSQL = SELECT * FROM tclientes where login="& login_atual &" And cpf="& cpf_atual &";" Rs.Open(cSQL, Conexao, 3, 3) If Rs.EOF Then Rs.Close Set Rs = Nothing Response.Write("Erro") Response.End() Else Rs.AddNew Rs("nome")=nome_atual Rs("login")=login_atual Rs("cpf")=cpf_atual Rs("idade")=idade_atual Rs("senha")=senha_atual Rs("nacionalidade")=nacionalidade_atual Rs.UpDate Rs.Close End if End Function %> Função para atualizar a tabela, após os dados ser atualizados, basta você abrir as sessions... Veja se pode lhe ajudar!!

Relaxa!! Metodo AddNew da ADO Artigo legalzinho para inicio de ultilização do AddNew e UpDate Veja se isto pode lhe ajudar.. Abraços!!

Beleza Brother!! Solucionado mais um problema, mais um emprego salvo, mas impostos recolhidos <_< , o governo deveria me amar..... :P Deividy, não esqueça de pedir ao moderador para fechar o tópico. Abraços e Boa Sorte!!! ;)

´ :rolleyes: Brother!! É mais ou menos, baseadu no código acima, só vai precisar de algums ajuste (sabe, aqueles ajuste de troca total.... rs....) Abraços!!!

Tradução do Erro: Acho que você não tem permissão para atualizar a base de dados, altere as permissões de acesso no servidor para que não seja gerada mais mensagens de erro. Veja se isto salva seu problema & emprego e, por falar nisso, não tem uma vaguinha aí pra mim ? estou cansado da vida de suporte tecnico.... :D Abraços!!!!

Salve Brother!!! <% Dim Campo Campo=Request.Form("Campo") Set Conn = Server.CreateObject("adodb.connection") Set Rs = Server.CreateObject("adodb.recordset") cBanco = Server.MapPath("/Banco.mdb") strConn = "Provider = Microsoft.Jet.OLEDB.4.0; Data source = "& cBanco &";" cSQL = "Select Nome From Usuario" Conn.Open(strConn) Set Rs = Conn.Execute(cSQL) If Rs.EOF Then Response.Write("Não há nada no banco de dados") End if If Rs("Nome") = Campo Then rs.addnew rs(1) = campo_do_form rs(2) = campo_do_form rs(3) = campo_do_form rs(4) = campo_do_form rs.update Else poeSQL = "Insert (nome, telefone, email, namorada) into Geral Values('"& variavel1 &"', '"& variavel2 &"', '"& variavel3 &"', '"& variavel4 &"');" Conn.Execute(poeSQL) Response.Redirect("OK.asp") End if Conn.Close Rs.Close Set Conn = Nothing Set Rs = Nothing %> Fiz no tapa, veja se isso aí acima pode lhe ajudar. Abraços!!!

Brother!!! Para onde você esta redirecionando seu usuário ? Posta um de seus códigos para gente ver no que esta dando errado. Abraços!!!

Sim Hudson!! você pode ultilizar o método UpDate, em vez de você deletar os valores da tabela, simplesmente você o atualizar para '0'. Abraços!!!

Brother!! Para você informar ao servidor que você esta inserindo o valor de uma variavel dentro de uma string: <% MeuSQL = "xxxxxxxxxxxxxxxx "& variavel &";"%> Abraços!!!

Bom Bobby!! É muito relativa esta sua pergunta, depende muita da pessoa, pois há desenvolvedores que se adptam melhor a linguagem CGI e não quer ultilizar outra linguagem, eu, me adptei melhor as linguagem da Microsoft, não sei se foi porque iniciei elas ou por elas ser versateis, eu tentei aprender PHP, no começo foi até facil, mas não consegui me adptar as sintaxes, CGI ultilizei duas ou vezes para o envio de um formulário dentro de Host de um cara mas nada grande. É muito relativo cara, vai de cada um, foi como eu disse, vai do programador, cada um se adpta melhor a uma linguagem, esta é minha opinião... Abraços!!!

Brother!! Pode ser, não sei ao certo, mas acho que você esta tentando inserir dados de um tipo que não é compativel com o banco de dados, por exemplo: Campo Telefone, Tipo: Numero você está tentando inserir dados do tipo Texto(string) Consegue entender ? Dá uma olhadinha e ultilize alguns conversores (CInt, CStr, etc..) em suas variaveis antes de inserir no seu banco de dados. Abraços!!!

Brother!!! É um errinho nesta clausula SQL, experimente o seguinte: ComandoSQL = " delete * from emissora where código="& cid &";" Abraços!!!

Brother!! O IIS (Internet Information Services) é um componente que esta dentro do Windows nas versões NT/2000/XP Pró. Basta você adiciona-lo, a explicação de como adicionar esta neste POST que respondi ontem. Abraços!!

Brother!! Veja se este código pode lhe ajudar: set rs=conn.execute("delete pontos from usuarios where pontos="& var &";")

Brother!! você pode dar um UpDate na sua tabela, apenas atualizando os campos necessários, evitando assim muito carregamento de seu servidor. Eu, particularmente, gosto de usar o UpDate do ADO, que alem de ser interessante, é facil e rapido. Abraços!!!

Brother!! Boa Pergunta!!! :D Quando eu tentei fazer o curso também, eu me fiz a mesma pergunta, e ai, desisti do curso, não sei porque...

Brother!! Detalhes para conexão ASP c/ MySQL!! Veja se pode lhe ajudar!! Abraços!!