Rickardo
-
Total de itens
479 -
Registro em
-
Última visita
Tudo que Rickardo postou
-
Pelo amor de Deus isso aqui está certo?? Set EnviarMail = Server.CreateObject("CDONTS.NewMail") EnviarMail.To = email_local EnviarMail.From = para_adm EnviarMail.Subject = "StorCase - Cadastro" MsgBody = "<html>" _ & "<head>" _ & "</head>" _ & "<body bgcolor=""#FFFFFF"">"_ & "<p>" & contato_local & ", <br />"_ & " <br />"_ & " Bem-vindo à <strong>BRC Representações </strong>, <br />"_ & " <br />"_ & "Recebemos seus dados de cadastro, nisso cumprimentamos você por esta iniciativa e interesse por nossos produtos. </p>"_ & "<p>Informamos que no prazo de até 24 horas seu cadastro será efetivado para que tenha acesso á nossa lista de produtos</p>"_ & "<p>confira abaixo seus dados.</p>"_ & "<p> <br />"_ & " Seu <strong>login</strong>: <strong>"& email_local & "</strong> <br />"_ & " Sua <strong>senha</strong>:<strong>"& senha_local & "</strong><br />"_ & " <br />"_ & "Estamos sempre disponíveis para sanar suas dúvidas.</p>"_ & "<p><br />"_ & " Um grande abraço, <br />"_ & " <br />"_ & " <strong>BRC Representações </strong>"_ & " . </p>"_ & "<p><strong>Dados Cadastrais </strong></p>"_ & "<p> Razão Social: "& razao_local & " <br />"_ & " Nome Fantazia: "&nome_local & " <br />"_ & " Contato: "& contato_local & "<br />"_ & " Cargo/Setor: "& cargo_local & " <br />"_ & " CNPJ: "& cnpj_local & "<br />"_ & " Inscrição Estadual: "& ie_local & " <br />"_ & " Telefone: "& tel_local & " <br />"_ & " Endereço: "& end_local & "<br />"_ & " Bairro: "& bairro_local & "<br />"_ & " Cidade: "& cidade_local & "<br />"_ & " Estado: "& estado_local & "<br />"_ & "</body>" _ & "</html>" EnviarMail.Body = MsgBody EnviarMail.Importance = 1 EnviarMail.BodyFormat = 0 EnviarMail.MailFormat = 0 EnviarMail.Send Set EnviarMail = Nothing Grato.
-
ola.. já está resolvido.. o amigo Marcos-rj me deu uma força
-
aí amigo eu estou dando um SELECT e mando exibir os dados em uma tabela.. sendo que coloquei um botão pra exibir os dados completos de um determinado registro.. como faço pra enviar e exibir os dados do registro selecionado na minha pagina, em um formulário para que eu possa autera-lo? (UPDATE ) PODE ME DAR UMA LUZ AÊ? pra que você entenda melhor olha aí o link www.brd.com.br/brc/lista/mostra_list_cli.asp você vai ver que ao fim de cada linha tem uma lupa. gostaria que ao clicar nessa lua enviase todos os dados para um form. para poder alterar podeme ajudar você ou alguém aí? grato.
-
Brigadãio..
-
perfeito amigo........ era isso mesmo.... agora que está começando entrar na caixola.. a relação asp x php ,.. mais ainda prefiro php
-
esse escript aqui está certo?? <% Option Explicit Dim pasta_dados, conexao, dados, buscar, rsquery pasta_dados="e:\home\brd\dados\db\cadastro.mdb" set Conexao=server.createobject("ADODB.connection") dados = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&pasta_dados&";" Conexao.open dados buscar = "SELECT * FROM cadastro ORDER BY id DESC" set rsquery = conexao.execute(buscar) %> <table width="100%" cellspacing="6"> <% while not rsquery.eof %> <tr bgcolor="#E4E4E4"> <td width="162"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><b><font color="#006666"><%=rsquery("codigo")%></font></b></font></td> <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2"></font><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><%=rsquery("razaosoc")%></font></td> </tr> <% rsquery.movenext wend rsquery.close set rsquery = nothing %> </table>
-
MAIS COMO EU CHAMO O ARQUIVO? É SÓ includes conexa.asp ou tem alguma tag? tipo <% include conexao.asp < form > hauauhauhauhauhau </form> %> é assim??
-
alguém poderia me ajudar como faço pra exigir que todos os campos do formulário seja preenchido?? e não fique nem um em branco?
-
aí amigo deu certo agora.. valeu .. brigadão.. mais me diz aê.. ei vou fazer varios froms de inclusão.. posso criar um arquivo conexão.asp e por esse código pra não ter que digitar tudo?? como é que eu chamo ele nos outros arquivos?? :S grato.
-
<% Option Explicit Response.Expires = 0 Dim razao_local, nome_local, contato_local,cargo_local, cnpj_local, nome, tel_local, ie_local, email_local, end_local, bairro_local, cidade_local, estado_local, conexao, sqlstmt, rsquery, tbl, pasta_dados razao_local = request.form("rz") nome_local = request.form("nf") contato_local = request.form("contato") cargo_local = request.form("cargo") cnpj_local = request.form("cnpj") ie_local = request.form("ie") tel_local = request.form("tel") email_local = request.form("email") end_local = request.form("end") bairro_local = request.form("bairro") cidade_local = request.form("cidade") estado_local = request.form("estado") pasta_dados="e:\home\brd\dados\db\cadastro.mdb" set Conexao=server.createobject("ADODB.connection") Conexao = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&pasta_dados&";" Conexao.open sqlstmt = "INSERT INTO cadastro (razaosoc, nomefanta, contato, cargo, cnpj, ie, fone, email, endereco, bairro, cidade, estado) values ('" & razao_local & "','" & nome_local & "','" & contato_local & "','" & cargo_local & "','" & cnpj_local & "','" & ie_local & "','" & tel_local & "','" & email_local & "','" & end_local & "','" & bairro_local & "','" & cidade_local & "','" & estado_local & "')" set rsquery = conexao.execute(sqlstmt) conexao.Close() response.redirect("inserido_com_sucesso.htm") %>
-
cara ainda não deu .. agora está dando esse erro Microsoft VBScript runtime error '800a01a8' Object required: 'Provider=Microsoft.J' /lista/inserir.asp, line 26
-
amigo tirei .. e continua na mesma Microsoft JET Database Engine error '80040e14' Syntax error in INSERT INTO statement. /lista/inserir.asp, line 28 você tem MSN?? pra tc melhor?
-
se fosse php já tinha feito mais asp ,.. que coisa.. só da pau deu o mesmo erro Microsoft JET Database Engine error '80040e14' Syntax error in INSERT INTO statement. /lista/inserir.asp, line 31
-
olha aí em baixo como está.. <% Option Explicit Response.Expires = 0 Dim razao_local, nome_local, contato_local,cargo_local, cnpj_local, nome, tel_local, ie_local, email_local, end_local, bairro_local, cidade_local, estado_local, conexao, sqlstmt, rsquery, tbl razao_local = request.form("rz") nome_local = request.form("nf") contato_local = request.form("contato") cargo_local = request.form("cargo") cnpj_local = request.form("cnpj") ie_local = request.form("ie") tel_local = request.form("tel") email_local = request.form("email") end_local = request.form("end") bairro_local = request.form("bairro") cidade_local = request.form("cidade") estado_local = request.form("estado") set Conexao=server.createobject("adodb.connection") Conexao.provider="microsoft.jet.oledb.4.0" Conexao.connectionstring=server.mappath("db/cadastro.mdb") Conexao.open set tbl = server.createObject("adodb.recordset") tbl.Open "cadastro", conexao sqlstmt = "INSERT INTO cadastro (razaosoc, nomefanta, contato, cargo, cnpj, ie, fone, email, end, bairro,cidade, estado) values ('" & razao_local & "','" & nome_local & "','" & contato_local & "','" & cargo_local & "','" & cnpj_local & "','" & ie_local & "','" & tel_local & "','" & email_local & "','" & end_local & "','" & bairro_local & "','" & cidade_local & "','" & estado_local & "')" set rsquery = conexao.execute(sqlstmt) response.redirect("inserido_com_sucesso.htm") %> e aí está certo ou está errado o que eu estou fazendo?/ desculpa aí .. mais estou tentando entender .. e resolver..
-
MEU INERT NÃO está FUNCIONANDO.. olha ele aí sqlstmt = "INSERT INTO cadastro (razaosoc, nomefanta, contato, cargo, cnpj, ie, fone, email, end, bairro,cidade, estado) values ('" & razao_local & "','" & nome_local & "','" & contato_local & "','" & cargo_local & "','" & cnpj_local & "','" & ie_local & "','" & tel_local & "','" & email_local & "','" & end_local & "','" & bairro_local & "','" & cidade_local & "','" & estado_local & "')" está dando esse erro aqui Microsoft JET Database Engine error '80040e14' Syntax error in INSERT INTO statement.
-
aí galera. fiz a conexão. <% set Conexao=server.createobject("adodb.connection") Conexao.provider="microsoft.jet.oledb.4.0" Conexao.connectionstring=server.mappath("dados/seu_banco.mdb") Conexao.open %> e agora? como abro a tabela?? ague ajuda por favor?
-
amigo desculpa aê mais sou mei burrim.. olha aê meu codigo que vai inserir no bd.. <% razao_local = request.form("rz") nome_local = request.form("nf") contato_local = request.form("contato") cargo_local = request.form("cargo") cnpj_local = request.form("cnpj") ie_local = request.form("ie") tel_local = request.form("tel") email_local = request.form("email") end_local = request.form("end") bairro_local = request.form("bairro") cidade_local = request.form("cidade") estado_local = request.form("estado") sqlstmt = "insert into agenda (razaosoc, nomefanta, contato, cargo, cnpj, ie, fone, email, end, bairro,cidade, estado) values ('" & razao_local & "','" & nome_local & "','" & contato_local & "','" & cargo_local & "','" & cnpj_local & "','" & ie_local & "','" & tel_local & "','" & email_local & "','" & end_local & "','" & bairro_local & "','" & cidade_local & "','" & estado_local & "')" set conn = server.createobject("adodb.connection") conn.open "TESTE_ODBC" set rsquery = conn.execute(sqlstmt) response.redirect("inserido_com_sucesso.htm") %> Agora te pergunto... como expecifico o meu bd? o nome dele é cadastro.mdb e a tabela?? nome dela é cad não compreendi o esquema de abrir. pode me ajudar??
-
quero fazer um cadastro de asp com access, meu bd tem o nome de cadastro.mdb, tabele = cad como faço a conexão? como abro a tabela? como cadastro alguém tem um exemplo aí?? porfavor ajuda??
-
como conf. redes em MAC OS9??
-
já verifiquei.. em todos as configurações de Redes daki da empres.. incusive no servidor... porem, fui informado que estão recebendo uma lista detalhada de horario que entram no MSN, ou em qualquer outro site.. lembro que 1 vez instalei um software em minha maquina que me informava isso, quando eu estava fora de casa.,.. creio que seja algum soft desse tipo.. alguém pode me ajudar???
-
ô amiguinho.. não funcionou não.. pode me ver outra.. tipo.. que tambem quando o cara clicar em sim feche o popup e abra o site solicitado.. ???
-
como faço uma função +ou- assim?? tipo ao clicar em um link, me apareça um popup com uma pergunta.. "você realmete que rir para tal pagina?" se clicar no botão sim -> vai Se clicar no botão não -> não vai , e fecha o popup
-
ao final mostra os dados digitado no form e diz que foi cadastrado mais quando vejo no bd não tem nada nem linha em branco. <? include "conexao.php"; $data = $_POST["data"]; echo "$data"; $local = $_POST["local"]; echo "$local"; $partici = $_POST["partici"]; echo "$partici"; $sql = "INSERT INTO agenda VALUES"; $sql .= "('$data', '$local', '$partici')"; mysql_query($sql); if($sql){ echo "Dados Cadastrados com sucesso!!"; }else{ echo "O Não pode ser cadastrado!!!!"; } ?>
-
valeu parceiro deu certin
-
pessoal.. é o seguinte tenho um formulario com os seguites itens. 1 pra colocar o nome 1 pra colocar descrições 1 pra procurar a imagem que será enviada. aí pego esses dados e envio via post pro upload.php pra pegar os dados e inserir no bd e enviar a imagem pro diretório na web. consigo inserir no bd, o nome a descrição , e tambem fazer up load da imagem pro serv. mais o nome da imagem não consigo por no bd. acho que errei em alguma coisa no script deem uma olhada por favor. <? include "conexao.php"; $nome = $_POST["nome"]; $desc = $_POST["desc"]; /* Defini aqui o tamanho máximo do arquivo em bytes: */ if($arquivo_size > 1024000) { print "<script> alert('Seu arquivo não poderá ser maior que 1mb'); window.history.go(-1); </SCRIPT>\n"; exit; } /* Defini aqui o diretório destino do upload */ if (!empty($arquivo) and is_file($arquivo)) { $caminho="imagens/"; $caminho=$caminho.$arquivo_name; /* Defini aqui o tipo de arquivo suportado */ if ((eregi(".gif$", $arquivo_name)) || (eregi(".jpg$", $arquivo_name))){ copy($arquivo,$caminho); /* insere no banco de dados */ $sql = "INSERT INTO setup VALUES"; $sql .= "('$nome', '$desc', '$arquivo')"; mysql_query($sql); print "<h1><center>Arquivo enviado com sucesso!</center></h1>"; } else{ print "<h1><center>Arquivo não enviado!</center></h1>"; print "<h2><font color='#FF0000'><center>Caminho ou nome de arquivo Inválido!</center></font></h2>"; } } ?>