ursolouco

Salve Reginaldo!! Brother.... Foi como lhe disse cara, sempre serás bem vindo aqui no forum da scriptbrasil, sempre que lhe sobrar um tempo, compareça para visitar os amigos e os inimigos ( ). Abraços!!! [urso..]

Dica porque estou sem tempo.. Crie uma consulta dentro do seu banco de dados com todas as tabelas e campos necessarios e ultilizando o objeto Command(Adodb.Command) execute sua consulta retornando todos os dados para seu recordset... O resto é facill.. Abraços!!! [fui...]

As vezes... quando conecto a internet em casa, uso o MSN e faço conversa com meu amigos do forum... (Versão 6.1) ICQ.. uso uma vez na vida, outra na morte...

Brother!! Combos dinamicas sem refresh.. é feito em JavaScript, se desejar, posso mover seu tópico para lá, para que seja melhor atendido. Abraços!!

Hum.... Se você esta usando DNS localmente, me parece que não há o mesmo DNS no servidor acessando o banco de dados. Dá uma olhadinha sobre isso...

Desafio sim!!! Mas não estou vendo seu sistema ou acesso a sua base de dados... Portanto.... NÃO ME VENHA COM CHURUMELAS!!! Logo mais, colocarei um codigo, semelhante ao seu, para download... Aguarde... depois conversaremos!!!

Bom, se as permissõe estão Ok (Leitura, gravação, listar diretorio... etc..) cabe a você olha o campo da tabela, veja se há valor padrão, se é requirido, se permite valor nulo.... detalhes assim.. Abraços!!!

Edson!! Por partes.... quais as permissões que tem seu diretório ?

Salve Brother!! Adoro polemicas no forum, mas já que é assim, vamos lá: Deixa eu tentar explicar.... Todos aqui sabem que não trabalho com desenvolvimento, nem para web ou aplicações comerciais, sou apenas um analista de suporte que curto pra xuxu desenvolver ou trabalhar com programação, devido a minha facilidade de aprender ou assimilar as coisas. Ultimamente, esta muito corrido aqui no suporte tecnico (Guto!! Ainda vou bolar aquele esquema de Cripto) e não esta me sobrando tempo necessário para me dedicar ao forum e as dúvidas dos d+, temo que entender que as pessoas tem suas ocupações e funções e vão ser exercidas, tanto no forum, quanto profissionalmente, por isso, as vezes chego muito atrasado ou até mesmo não respondo algumas dúvidas aqui no forum, o Reginaldo, tabem esta atolado de serviços, mas nem por isso deixa de comparecer ou dá sua opinião aqui. Reckless, Você como educador, olha só a responsabilidade que você tem, sabe melhor do que nunca que nem sempre temos a resposta na ponta da lingua ou tempo necessario para esclarecer/sanar dúvida, ficando assim por conta do tempo para resposta, é complicado mas é assim brother. Eu tambem, quando comecei aqui na SB, quando editaram meu POST pela segunda vez em deixar tudo, mas vi que não era necessario, conversei com moderador e as pessoas necessarias para ver se valia mesmo a pena, e hoje, graças a vocês, sou moderador eleito por todos, emborar uns não gostem, estou aqui. Mas tudo bem Brother, fico contente que você tenha gostado aqui da nossa seção e pela minha humilde(inutil), simples ajuda. Espero que ainda podemos contar com sua visita aqui na area, e as dúvidas, não pense duas vezes, pode postar aqui, que com maior prazer, vamos tentar lhe ajudar. Abraços!!! [urso]

Só um detalhe....... se registra na comunidade para ficar mais facil a comunicação...

Bolando Codigo <% cBanco = Server.MapPath("./cad/banco.mdb") strConn = "Provider = Microsoft.jet.oledb.4.0; Data Source = "& cBanco &";" Set Conn = Server.CreateObject("Adodb.Connection") Set Rs = Server.CreateObject("adodb.Recordset") iSQL = "INSERT INTO tb_Nome(nome) VALUES ("& nome &")" nome = Request.Form("nome") If nome<>"" Then Rs.Open iSQL, Conn, 3, 3 Rs.Close End if Conn.Close Set Conn = Nothing %> Bolado, enrolado, agora...... só botar fogo!!!

Moving to JavaScript

rs.open SQL,conn,3, 3

Mostra o código:

SQL = "insert into tb_nome(nome) Values("&nome&");" E olhe as permissões de acesso do banco de dados no diretório.

Veja as permissões de acesso ao banco de dados no diretório!!

Vai entender esses caras!!! Session.LCid = 1046 Data = Date() Caminho virtual: cBanco = Server.MapPath("Banco.mdb") Vô até fechar o tópico... Abraços!!!

Se ele não demostra erro 500, qual erro que esta dando ? Não é pra dá Control C + Control V que seu sistema vai funcionar, este código foi apenas bolado sobre o que você já tem...

Não gosto disso Fyoda, mas basicamente, se você precisa alterar a senha... há coisas a mais no seu código... <% Set Conexao = Server.CreateObject("adodb.connection") cBanco = Server.MapPath("banco.mdb") strConn = "Provider = Microsoft.jet.oledb.4.0; Data Source = "& cBanco &";" If Request.Form("enviado") = "sim" Then login = Replace(Request.Form("login"), "'", "/") senha = Replace(Request.Form("senha"), "'", "/") nsenha = Replace(Request.Form("nsenha"), "'", "/") c_senha = Replace(Request.Form("c_senha"), "'", "/") email = Replace(Request.Form("email"), "'", "/") nome = Replace(Request.Form("nome"), "'", "/") snome = Replace(Request.Form("snome"), "'", "/") sexo = Replace(Request.Form("sexo"), "'", "/") Conexao.Open(strConn) Set RS = Conexao.Execute("SELECT * FROM usuarios WHERE senha = '"&senha&"'") If Rs.Eof Then Response.Write "Senha Incorreta!<BR><a href=alterar.asp>Voltar</a>" Else Conexao.Execute("UPDATE usuarios SET login = '"&login&"', senha = '"&senha&"', email = '"&email&"', nome = '"&nome&"', snome = '"&snome&"', sexo = '"&sexo&"' WHERE senha = '"&senha&"'") Response.Write "Dados alterados" End if Conexao.Close Set Conexao = Nothing %>

Só completando. Esses Host não permitem a listagem do diretório, portanto se é definido a pagina inicial do site como "index.asp", se a mesma estiver "index.aspx" não vai reconhecida pedindo o login e senha para acesso... é uma pequena falta de atenção....... Olhe isto que tudo sairá bem no final...

Nome: Wellington Mail: devweb@hotmail.com

SQL = "SELECT TOP 5 * FROM Tabela ORDER BY Campo DESC"

Dá uma olhadinha na www.libihost.net!!!

Tópico sobre o assunto....