ursolouco
-
Total de itens
2.314 -
Registro em
-
Última visita
Tudo que ursolouco postou
-
Brunao!! Mesma coisa brother. Na propriedade 'BodyText ' do seu objeto de email, você coloca a montagem do seu html puxando-o do seu servidor. []'S
-
Bom, isso aí não é duvida sobre programação em ASP/Asp.Net, mas vou deixar seu tópico aqui.
-
Você não vai chorar né ? Brunao!!! Não tenho certeza, mas acho que seja feito no corpo do CDonts, em vez de se colocar, por exemplo, <img src='urso.gif'> o cara, coloca lá: <img src ='http://www.site.com.br/urso/gordo.gif'> E dessa forma, ele vai montando um <HTML> inteirinho no corpo do CDonts e envia em seu News... Abraços!!! [urso]
-
É Brother!!! Acho que o negocio mesmo é comprar a loja dos manos!!! Não tem jeito...
-
Mario!!! Desculpe-me, acho que estou trabalhando muito. Confundi seu tópico, com um sobre o tema de 'paginação'. Foi muito MaL estou até com vergonha.... desculpe.
-
1º Registre-se na comunidade. Isso vai lhe dar um bom trabalho!! Pode ser feito da seguinte forma: -Após o cadastramento do cliente, pode ser aberta uma session com o nome do cliente, -Usando FSO, você cria uma pasta dentro do servidor com o nome do cliente e uma identificação especial para ser enviado a foto. -No site, você pode criar um sistema de login, para que o cliente acesse seu conteudo e tenha a disposição de atualizar seus dados (afinal, ele pode mudar de endereço, concorda ?) Veja se esta dica é uma boa solução e começe a desenvolve-la. Abraços!!!!
-
<% Set Mailer = CreateObject("CDONTS.NewMail") Mailer.From = "eu@dominio.com.br" ' e-mail de quem esta enviando a mensagem Mailer.To = "conta@destinatario.com.br" ' e-mail de quem vai receber a mensagem Mailer.CC = "conta@destinatario.com.br" ' Com Cópia Mailer.BodyFormat = 1 ' parametro de formatação Mailer.MailFormat = cdoMailFormatText ' parametro de formatação Mailer.AttachFile "e:\home\login\dados\arquivo.txt" 'caso queira anexar algum arquivo ao seu e-mail Mailer.Subject = "Assunto do E-mail" Mailer.Body = "Corpo da Mensagem" Mailer.Send Set Mailer = Nothing %>
-
VirtuaStore
-
Movido para JavaScript!!!
-
Editado, viajei grandão. Desculpe-me.
-
Seria inserir dados no banco de dados ? Nester artigo tem informações de como, conectar e inserir dados no banco. Abraços!!! [urso]
-
Após o Login estar ok... <%... ........ sSQL = "SELECT * FROM Tabela Where Usuario = "& Usuario &";" Rs.Open sSQL, Conexao, 3, 3 If not Rs.Eof manda_pra_Onde = Rs("Site") Response.Redirect(manda_pra_Onde) Else Response.Write("Erro") End If + ou - isso aí...
-
Viu as permissões de acesso ao banco de dados ? Coloque seu código em ASP para gente dá uma olhadinha... Abraços!!! [urso]
-
É mesmo Brother!! Hospeda ele em algum HOST Free, e põe o link pra galera fazer download.!! Abraços!! [urso]
-
E ae brother! Tentei fazer como você disse mas deu o seguinte erro: Tentei substituir o "form" pelo nome do form que estou usando e ainda assim não deu certo! Brother!!! você viajou nessa!!! Vou te mandar um artigo de como fazer upLoad em ASP com AspUpLoad!! Abraços!! [ursolouco]
-
Brother!! Eu também, tenho mó dificuldade para paginar dados.... Complicado!! Mas vamos, estamos aki, para judar, um aos outros.... Todos os direitos e creditos deste código são de: 'Bicicleta' do forum Imasters!! Este código foi retirado do POST - Paginação!!! Veja o código que esta rodando no site: http://www20.brinkster.com/ursolouco/Brink...amples/site.asp <% cBanco = Server.MapPath("\ursolouco\db\BrinksterExampleDatabase.mdb") Set Conn = Server.CreateObject("adodb.connection") strConn = "Provider = Microsoft.jet.oledb.4.0; Data Source ="& cBanco &";" Conn.Open(strConn) %> <% registros = 20 pagina = Request.QueryString("pagina") If pagina = "" Then pagina = 1 End If Set rs = Server.Createobject("ADODB.RECORDSET") ' set rs.ActiveConnection = Conn ' rs.CursorType = 3 rs.PageSize = registros sql = "SELECT ProductName, QuantityPerUnit, UnitPrice, UnitsInStock FROM Products" rs.Open sql, Conn, 3, 3 If rs.EOF Then Response.Write "Nenhum registro encontrado" Else rs.AbsolutePage = pagina While Not rs.EOF AND x < rs.PageSize x = x + 1 %> <b><%=rs("ProductName")%></b><br> <% rs.MoveNext Wend anterior = pagina - 1 proxima = pagina + 1 ultima = rs.PageCount primeira = 1 ultm2 = FormatNumber(rs.PageCount - 1,0) If pagina <> 1 Then Response.Write "<b>« <a href=site.asp?pagina="&primeira&">Primeira Página</a></b> " End If If pagina > 1 AND pagina <> 2 Then Response.Write "<b>[ <a href=site.asp?pagina="&anterior - 1&">"&anterior - 1&"</a> ]</b> " End If If pagina > 1 Then Response.Write "<b>[ <a href=site.asp?pagina="&anterior&">"&anterior&"</a> ]</b> " End If Response.Write "<b>[ "&pagina&" ]</b> " If Not rs.EOF Then Response.Write "<b>[ <a href=site.asp?pagina="&proxima&">"&proxima&"</a> ]</b> " End If If Not rs.EOF AND pagina <> ultima AND pagina <> ultm2 Then Response.Write "<b>[ <a href=site.asp?pagina="&proxima + 1&">"&proxima + 1&"</a> ]</b> " End If If Not rs.EOF Then Response.Write "<b><a href=site.asp?pagina="&ultima&">Última Página</a> »</b> " End If End If rs.Close Set rs = Nothing %> Espero que lhe ajude... Até + [ursolouco]
-
é, vocês sabem né!!! Tio [urso] não pode ficar de fora dessas...... Tamanho: 'GG' [Go-Gostosão] Cor: Preta - Com simbolo da SB em Branco e letras Verdes!!! Manga Direita : ScriptBrasil por extenso Costas - Alto: [ursolouco] se possivel Pago Vintão, se quiser mais, vai ter que me trombar no kazebrão, e mesmo assim vou pagarm em bebidas (para bebemos juntos ) São Paulo, Zona Leste, porque Colonial !!!! Abraços!!! [urso]
-
Experimente assim. <% Variavel = objUpload.Form("CampoFormulario")%>
-
<% Session.LCID=1046 IpCliente = Request.ServerVariables("REMOTE_ADDR") IdSite = Request.Form("idSite") mData = Date() Function Votar(IdSite) votoSQL = "INSERT INTO tbranking(IdSite, Data, Ip)VALUES('"& IdSite &"',"& mData &",'"& IpCliente &"');" Set RsVoto = Server.CreateObject("adodb.recordset") Set RsVoto = Conexao.Execute(votoSQL) RsVoto.Close Set RsVoto = Nothing End Function MontaSQL = "SELECT * FROM tbranking Where Ip="& IpCliente &" And idSite="& IdSite&" And mData="& mData &";" Set Rs = Server.CreateObject("adodb.recordset") Rs.Open MontaSQL, Conexao, 3, 3 If Not Rs.Eof Then 'Não deve votar, porque achou o IdSite do dida de hoje, juntamente com o IpAtual Response.Redirect("ranking.asp") Else Call Votar(IdSite) End If %>
-
cara, não tenho certeza, mas acho q é. Não instalei nada, peguei um código pronto e estou tentando adaptá-lo ao q estou fazendo. Onde se vê se é ou não AspUpload? Onde esta seu código ASP para o envio do arquivo ? Há necessidade de ser usar AspUpLoad para enviar arquvos para dentro da pasta do servidor, e um detalhe importante, veja no seu HOST, se o seu plano de hospedagem, da suporte a AspUpLoad.
-
Cara, estou usando esse: <input name="browser" type="file" id="browser" size="40"> <!-- para selecionar o arquivo --> <input type="text" name="titulo" size="40"></td> <!-- para inserir um texto qualquer --> Tipo, tem como fazer upload de um arquivo e mandar os dados dos outros campos para o banco de dados usando a mesma form? Valeu brother! É aspUpLoad ?
-
Nada!! Tá dando pau no seu console MMC (se não me engano, é o gerenciador de mensagem do IIS ou gerenciado de serviço, não me recordo agora). Experimente reinstalar a criança...
