Belmonte SC
-
Total de itens
27 -
Registro em
-
Última visita
Tudo que Belmonte SC postou
-
Olá cyberalexxx, valeu ... vou dar uma olhada, mas acho que era isso que precisava mesmo!!! valeu!
-
Olá Henderson, não tenho ideia de como fazer, mas valeu... preciso da ajuda de como fazer isso. Mas acho que terei que copiar primeiro as fotos para o ftp para depois escolher atraves do sistema em Asp. valeu.
-
Boa tarde pessoal? Preciso gravar fotos, tipo sites de imobiliárias, onde cada imóvel possui 5 fotos. Gostaria de gravar as fotos apartir do PC (local) e que as fotos fiquem disponíveis na web para todos visualizarem... Obrigado.
-
Dor De Cabeça Com O Cdonts "urgente Plese ! :("
pergunta respondeu ao Marianne de Belmonte SC em ASP
porque você não cria variáveis para as figuras e depois chama pelas variáveis?? -
Dor De Cabeça Com O Cdonts "urgente Plese ! :("
pergunta respondeu ao Marianne de Belmonte SC em ASP
tenta aí... <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% 'recupera os valores empresa = Request.Form("empresa") atividade = Request.Form("atividade") contato = Request.Form("contato") mail = Request.Form("mail") endereco = Request.Form("endereco") cidade = Request.Form("cidade") uf = Request.Form("uf") cep = Request.Form("cep") mensagem = Request.Form("mensagem") 'Monta Mensagem HTML = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">" HTML = HTML & "<html>" HTML = HTML & "<head>" HTML = HTML & "<meta http-equiv=""Content-Type""" HTML = HTML & "content=""text/html; charset=iso-8859-1"">" HTML = HTML & "<title>Contatos </title>" HTML = HTML & "</head>" HTML = HTML & "<body bgcolor=""#FFFFFF"">" HTML = HTML & "<font size=""1"" face=""verdana"">" HTML = HTML & "<B>CONTATOS XXXXXX</B><BR><HR><BR>" HTML = HTML & "<B>EMPRESA : </B>" & empresa & "<BR>" HTML = HTML & "<B>ATIVIDADE : </B>" & atividade & "<BR>" HTML = HTML & "<B>CONTATO : </B>" & contato & "<BR>" HTML = HTML & "<B>E-MAIL : </B>" & mail & "<BR>" HTML = HTML & "<B>ENDEREÇO : </B>" & endereco & "<BR>" HTML = HTML & "<B>CIDADE : </B>" & cidade & "<BR>" HTML = HTML & "<B>UF : </B>" & uf & "<BR>" HTML = HTML & "<B>CEP : </B>" & cep & "<BR>" HTML = HTML & "<B>MENSAGEM : </B>" & mensagem & "<BR>" HTML = HTML & "</body>" HTML = HTML & "</html>" Set EnviarMail = Server.CreateObject("CDONTS.NewMail") EnviarMail.To = "xxxx@xxx.com.br" EnviarMail.From = empresa 'variavel EnviarMail.Subject = "CONTATOS xxxxx" EnviarMail.BodyFormat = 0 EnviarMail.MailFormat = 0 EnviarMail.Body = HTML EnviarMail.Send Set EnviarMail = Nothing URL = "sucesso.html" 'direciona para uma página de ok response.redirect(URL) %> -
Não Estou Conseguindo Solucionar O Erro
pergunta respondeu ao PRISCILA STOCHINI de Belmonte SC em ASP
Olá Priscila, acho que você está chamando 2 vezes para abrir a conexao, com call (que n aparece no código acima) e com include... coloque o código onde está o call -
Tem Como Usar Esta Expressao Ou Algo Semelhante?
pergunta respondeu ao marcos_804 de Belmonte SC em ASP
você pode usar select case!! ao invés de if... -
Acontece...faço isso toda a hora...de tanto código dá um nó...estou indo...até mais...quaquer coisa posta aí...
-
é verdade...presta atenção menina...eheheheh
-
você precisa colocar ../banco/xxx.mdb se o banco estiver em outro lugar..... observe o ..
-
usa assim... <%@ LANGUAGE="VBSCRIPT"%>
-
Use como o MArcos sugeriu... "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & server.mappath("formularios.mdb") Se o banco estiver em uma pasta separada então ("../banco/formulários.mdb") Sugiro que você coloque em uma pasta separada...
-
Então você pode usar assim: Com OLEDB: set con=server.createobject("adodb.connection") Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../banco/xxx.mdb") & ";" Ou assim: "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\somepath\mydb.mdb;" você está usando com ODBC? OleDB?
-
Ok, faz parte, também já me ajudaram bastante...deu certo?
-
Priscila, bco.open("driver={Microsoft Access Driver (*.mdb)}; DBQ=formularios.mdb") você precisa indicar o drive apos o DBQ, ex: "Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\mydatabase.mdb;"
-
você vai precisar primeiro ler a serial e depois fazer a procura no bd. no VB tem um componente chamado MSCOMM. é só você desenvolver o código...diretamente em access n conheço...derrepente em VBA...
-
Ex: <input type="radio" name="caixa" value="1" > <input type="radio" name="caixa" value="2" > Na página que vais postar fica: var1= request.form("caixa") ele vai selecionar o valor que o usuario clicou... observe que o nome é igual, só muda os values.
-
sempre preste atenção nos "names", tanto dos radio, check button, etc...você vai usar eles para passar os valores...
-
uso assim" set con=server.createobject("adodb.connection") Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../banco/banco.mdb") & ";" você colocou contra barra!!! Set Conexao = Server.CreateObject("ADODB.Connection") Conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("\eventos\cs\bdCS.mdb") e outra coisa: se o banco estiver em pasta diferente você precisa sair para entrar na pasta do banco usando o .. , então use ("../pasta/banco.mdb"). falow...
-
Cara, tenho algo parecido, só que tenho o sinal de + conforme abaixo, tirei o sinal e dá erro...tenta aí... ComandoSQL = ComandoSQL + & "'" & Server.HTMLEncode(Request.FORM("Jog1_C")) & "',"
-
Olá Priscila, acho melhor você fazer o formulário e postar chamando outro arquivo para envio... abaixo coloquei um exemplo do arquivo... n sei se era isso que você queria...abraço... <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% 'recupera os valores empresa = Request.Form("empresa") atividade = Request.Form("atividade") contato = Request.Form("contato") mail = Request.Form("mail") endereco = Request.Form("endereco") cidade = Request.Form("cidade") uf = Request.Form("uf") cep = Request.Form("cep") mensagem = Request.Form("mensagem") 'Monta Mensagem HTML = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">" HTML = HTML & "<html>" HTML = HTML & "<head>" HTML = HTML & "<meta http-equiv=""Content-Type""" HTML = HTML & "content=""text/html; charset=iso-8859-1"">" HTML = HTML & "<title>Contatos </title>" HTML = HTML & "</head>" HTML = HTML & "<body bgcolor=""#FFFFFF"">" HTML = HTML & "<font size=""1"" face=""verdana"">" HTML = HTML & "<B>CONTATOS XXXXXX</B><BR><HR><BR>" HTML = HTML & "<B>EMPRESA : </B>" & empresa & "<BR>" HTML = HTML & "<B>ATIVIDADE : </B>" & atividade & "<BR>" HTML = HTML & "<B>CONTATO : </B>" & contato & "<BR>" HTML = HTML & "<B>E-MAIL : </B>" & mail & "<BR>" HTML = HTML & "<B>ENDEREÇO : </B>" & endereco & "<BR>" HTML = HTML & "<B>CIDADE : </B>" & cidade & "<BR>" HTML = HTML & "<B>UF : </B>" & uf & "<BR>" HTML = HTML & "<B>CEP : </B>" & cep & "<BR>" HTML = HTML & "<B>MENSAGEM : </B>" & mensagem & "<BR>" HTML = HTML & "</body>" HTML = HTML & "</html>" Set EnviarMail = Server.CreateObject("CDONTS.NewMail") EnviarMail.To = "xxxx@xxx.com.br" EnviarMail.From = empresa 'variavel EnviarMail.Subject = "CONTATOS xxxxx" EnviarMail.BodyFormat = 0 EnviarMail.MailFormat = 0 EnviarMail.Body = HTML EnviarMail.Send Set EnviarMail = Nothing URL = "sucesso.html" 'direciona para uma página de ok response.redirect(URL) %>
-
Cara, você já conseguiu, n sei se é isso que você precisa, mas tenta aí... Criei um formulário que posta para esse arquivo... <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% 'recupera os valores empresa = Request.Form("empresa") atividade = Request.Form("atividade") contato = Request.Form("contato") mail = Request.Form("mail") endereco = Request.Form("endereco") cidade = Request.Form("cidade") uf = Request.Form("uf") cep = Request.Form("cep") mensagem = Request.Form("mensagem") 'Monta Mensagem HTML = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">" HTML = HTML & "<html>" HTML = HTML & "<head>" HTML = HTML & "<meta http-equiv=""Content-Type""" HTML = HTML & "content=""text/html; charset=iso-8859-1"">" HTML = HTML & "<title>Contatos </title>" HTML = HTML & "</head>" HTML = HTML & "<body bgcolor=""#FFFFFF"">" HTML = HTML & "<font size=""1"" face=""verdana"">" HTML = HTML & "<B>CONTATOS XXXXXX</B><BR><HR><BR>" HTML = HTML & "<B>EMPRESA : </B>" & empresa & "<BR>" HTML = HTML & "<B>ATIVIDADE : </B>" & atividade & "<BR>" HTML = HTML & "<B>CONTATO : </B>" & contato & "<BR>" HTML = HTML & "<B>E-MAIL : </B>" & mail & "<BR>" HTML = HTML & "<B>ENDEREÇO : </B>" & endereco & "<BR>" HTML = HTML & "<B>CIDADE : </B>" & cidade & "<BR>" HTML = HTML & "<B>UF : </B>" & uf & "<BR>" HTML = HTML & "<B>CEP : </B>" & cep & "<BR>" HTML = HTML & "<B>MENSAGEM : </B>" & mensagem & "<BR>" HTML = HTML & "</body>" HTML = HTML & "</html>" Set EnviarMail = Server.CreateObject("CDONTS.NewMail") EnviarMail.To = "xxxx@xxx.com.br" EnviarMail.From = empresa 'variavel EnviarMail.Subject = "CONTATOS xxxxx" EnviarMail.BodyFormat = 0 EnviarMail.MailFormat = 0 EnviarMail.Body = HTML EnviarMail.Send Set EnviarMail = Nothing URL = "sucesso.html" 'direciona para uma página de ok response.redirect(URL) %> acho que é isso, uso assim e funciona bem...falow...abraço
-
Meu amigo fercosmig, funcionou perfeitamente, ficou bem com eu queria e n estava conseguindo... valeu amigão...abraço.
-
Marcos 804, valeu pela dica, mas estou tentando fazer com que n precise criar essa página, gostaria de fazer apartir da página onde estao os radio buttons. Mas valeu, se eu n conseguir fazer como quero, vou fazer conforme sua sugestao... valeu...
-
Ok, se conseguir ajudar agradeço...fiquei parado nesse problema...valeu...