bareta

pelo que vi está usando o codigo do dreamweaver né.... ajustou o caminho do bd ???? pra por na web???

faz um select e pega o que tem nele primeiro depois adiciona o restante

veja no banco de tutoriais do site... um sistema de users online com bd lá você terá a sua solução

já entrou em contato com o provedor????

talvez dessa forma não.... o que você pode fazer é gerar o pdf.... com alguns componentes tipo o asppdf.... existem varios é so procurar....

pelo que entendi.... da pra usar querystring se usar um iframe dentro da msg ou um campo hidden.... mais tem que testar se esats opções vai dar certo

a extensão .do pode ser html,php,asp,cmf ou qualquer coisa.... no iis por exemplo você pode configurar as extensoes.... hj eu vi o site da bvfinanceira a extensão deles é .bvf

use asphttp.... você pode tirar de qualquer site que quiser....

veja no tópico de funções.... paginação em ASP - ótimo script

o que você quer fazer exatamente abrir a porta??? ou gerar acesso via ftp??

se não me engano tem um script nas funções aqui do forum.... que mostra os componentes instalados e também qual a dll e ond fica...

no meu calendario a unica coisa que fiz para esta diferença é.... antes de escrever o dia, consultar o bd sobre este dia se tiver algo usa o css dia_evento se num tive nada usa css dia normal.... minha função de calendario <% Const strTxtJanuary = "Janeiro" Const strTxtFebruary = "Fevereiro" Const strTxtMarch = "Março" Const strTxtApril = "Abril" Const strTxtMay = "Maio" Const strTxtJune = "Junnho" Const strTxtJuly = "Julho" Const strTxtAugust = "Agosto" Const strTxtSeptember = "Setembro" Const strTxtOctober = "Outubro" Const strTxtNovember = "Novembro" Const strTxtDecember = "Dezembro" Function dias_mes(mês,ano) If IsDate(ano & "-" & mês & "-" & 31) Then dias_mes = 31 ElseIf IsDate(ano & "-" & mês & "-" & 30) Then dias_mes = 30 ElseIf IsDate(ano & "-" & mês & "-" & 29) Then dias_mes = 29 ElseIf IsDate(ano & "-" & mês & "-" & 28) Then dias_mes = 28 End If End Function FUNCTION inicio_mes(ano,mês) inicio_mes=WeekDay(ano & "-" & mês & "-01") end function Function nome_mes(mês) Select Case mês Case 1 nome_mes = strTxtJanuary Case 2 nome_mes = strTxtFebruary Case 3 nome_mes = strTxtMarch Case 4 nome_mes = strTxtApril Case 5 nome_mes = strTxtMay Case 6 nome_mes = strTxtJune Case 7 nome_mes = strTxtJuly Case 8 nome_mes = strTxtAugust Case 9 nome_mes = strTxtSeptember Case 10 nome_mes = strTxtOctober Case 11 nome_mes = strTxtNovember Case 12 nome_mes = strTxtDecember End Select End Function %> <% function calendario(mês,ano,dia_m,linha) dia=0 primeiro_dia=inicio_mes(ano,mês) maximo_dias=dias_mes(mês,ano) nome_do_mes=nome_mes(mês) if mês=1 then mes_a=12 ano_a=ano-1 else mes_a=mês-1 ano_a=ano end if if mês=12 then mes_p=1 ano_p=ano+1 else mes_p=mês+1 ano_p=ano end if Response.Write"<table width=""100%"" border=""0"" cellspacing=""1"" cellpadding=""3"" class=""tabela"">" Response.Write" <tr>" Response.Write" <td class=""ano"" align=""left"">" Response.Write" <A href=""default.asp?dia="&dia_m&"&mês="&mes_a&"&ano="&ano_a&"""><<</a></td>" Response.Write" <td colspan=""5"" class=""ano""><div align=""center"">"&nome_do_mes&" - "&ano&" </div></td>" Response.Write" <td class=""ano"" align=""right""><A href=""default.asp?dia="&dia_m&"&mês="&mes_p&"&ano="&ano_p&""">>></a></td>" Response.Write" </tr>" Response.Write" <tr>" Response.Write" <td width=""14.28%"" class=""dias_semana""><div align=""center"">D</div></td>" Response.Write" <td width=""14.28%"" class=""dias_semana""><div align=""center"">S</div></td>" Response.Write" <td width=""14.28%"" class=""dias_semana""><div align=""center"">T</div></td>" Response.Write" <td width=""14.28%"" class=""dias_semana""><div align=""center"">que</div></td>" Response.Write" <td width=""14.28%"" class=""dias_semana""><div align=""center"">que</div></td>" Response.Write" <td width=""14.28%"" class=""dias_semana""><div align=""center"">S</div></td>" Response.Write" <td width=""14.28%"" class=""dias_semana""><div align=""center"">S</div></td>" Response.Write" </tr>" Response.Write" <tr>" FOR SEMANA=1 TO 6 FOR dias=1 TO 7 If DIA > 0 Then DIA = DIA + 1 If primeiro_dia = dias AND dia = 0 Then dia = 1 Response.Write(vbCrLf & " <td align=""center"" ") If dia => 1 AND dia <= maximo_dias Then If mês = mês AND cint(trim(dia)) = cint(trim(dia_m)) AND ano = ano Then Response.Write(" onmousemove=""this.style.background='#FFDBA6'"" onmouseout=""this.style.background='e7e7e7'"" class=""data_hoje"">") Else Response.Write(" onmousemove=""this.style.background='#FFDBA6'"" onmouseout=""this.style.background='f7f7f7'"" class=""data_normal"">") End If Else Response.Write(" onmousemove=""this.style.background='#FFDBA6'"" onmouseout=""this.style.background='ffffff'"" class=""data_branco"">") End If If dia => 1 AND dia <= maximo_dias Then clas="" sql="select * from agenda where data=#"&cdate(dia&"/"&mês&"/"&ano)&"#" set rs=conn.execute(sql) if not rs.eof then clas="links_novo" Response.Write("<a class="""&clas&""" href=""default.asp?id="&id&"&dia="&dia&"&mês="&mês&"&ano="&ano&"&act="&base64encode("agenda")&""">"&dia&"</a>") else response.write dia end if rs.close set rs=nothing else response.write "&nbsp;" End If Response.Write("</td>") Next Response.Write(vbCrLf & " </tr>") If linha=1 and maximo_dias =< dia Then Exit For Next Response.Write(vbCrLf & "</table>") end function %>

e ai andreia beleza... seguinte... eu sempre faço o seguinte... com o dundas eu coloco o unique names em true ai ele gera aquela chave na frente do nome {656546546546546}_nome.gif... certo... ai não tem problemas de o arquivo existir.... correto... ai entra o seguinte por exemplo no orkut na foto do perfil você pode mudar a vontade né... mas nunca um usuario deve ter 2 ou arquivos de foto gravados.... o que seria um sendo mostrado e os outros apenas oculpando espaço né.... então no form sempre fiz o seguinte se o cara atualizar os dados trocando a fto uso fso e deleto o arquivo anterior.... pegando o caminho da pasta de fotos e o nome da foto que fica no form em um campo tipo hidden.... bom é muito util...

tipo se tiver todos os campos preenchidos um cor=split(request.form("cor"),",") tamanho=split(request.form("tamanho"),",") produto=split(request.form("produto"),",") quant=split(request.form("quant"),",") ai faz isso en todos os campos criando variaveis de nome diferentes.... for i=lbound(cor) to ubound(cor) sql="insert into tabela (campo,campo) values ("&cor(i)&","&quant(i)&")" conn.execute(SQL) next mais ou meno isso entendeu... so funciona se todos os campos forem obrigatorios.... e todos os produtos com mesmo numero de campos

não entendi nada....

ele está funfando ainda esse dias tava olhando umas coisas minhas que tenho lá....

<% '---------------- RESPOSTA DO TECNICO COM ANEXO--------------------- 'selecionando o registro cadastrado para preparar o envio de email sql = "Select * from suptec where codigo = '"&Vcodigo&"'" 'executando recordset para pesquisar se os dados foram cadastrados Set rs = bco.Execute(sql) 'verificando se houve erro, se não houve envia por email if rs.eof then Response.Write("Registro não encontrado.Erro na gravação") else 'definimos o endereço de email que irá enviar o email Vemail = "teste@cype.com.br" 'criamos o obejto do cdonts Set EnviarMail = Server.CreateObject("CDONTS.NewMail") 'recebe o valor do recordset com o email cadastrado EnviarMail.To = rs("email") 'recebe o email de quem envia da variavel Vemail EnviarMail.From = Vemail 'corpo do email armazenado na variavel 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>DÚVIDA ENCAMINHADAS AO SUPORTE TÉCNICO DA MULTIPLUS</title>" HTML = HTML & "</head>" HTML = HTML & "<body bgcolor=""#FFFFFF"">" HTML = HTML & "<p style=""font-family: Arial, Helvetica, sans-serif; font-size: 24px"">MULTIPLUS</span><br/>" HTML = HTML & "<span style=""font-size: 12px"">Softwares T&eacute;cnicos</span></p>" HTML = HTML & "<p style=""font-size: 18px; font-family: Arial, Helvetica, sans-serif"">Resposta a dúvida encaminhada ao Departamento de Suporte Técnico da MULTIPLUS:</p>" HTML = HTML & "<font size=""2"" face=""arial"">" HTML = HTML & "<B>Prezado Usuário: </B>" & Session("Vcontato") & "<BR><BR>" HTML = HTML & "<B>Assunto da Dúvida: </B>" & Session("Vresumo") & "<BR>" HTML = HTML & "<B>Dúvida: </B>" & Session("Vduvida") & "<BR><BR>" HTML = HTML & "</font>" HTML = HTML & "<font size=""3"" face=""arial"" color=""#FF0000"">" HTML = HTML & "<B>RESPOSTA DO SUPORTE TÉCNICO DA MULTIPLUS</B><BR>" HTML = HTML & "</font>" HTML = HTML & "<font size=""2"" face=""arial"">" HTML = HTML & "<B>Técnico: </B>" & Session("Vtecnico") & "<BR>" HTML = HTML & "<B>Resposta: </B>" & Session("Vresposta") & "<BR>" HTML = HTML & "<B>Anexo: </B>" & nome_arquivo & "<BR>" HTML = HTML & "</font>" HTML = HTML & "</body>" HTML = HTML & "</html>" 'propriedade recebe a variavel do corpo do email Server.ScriptTimeout = 1000 varanexo = Server.MapPath(Varquivo) Set myMail = CreateObject("CDONTS.NewMail") myMail.From = "teste@cype.com.br" myMail.To = rs("email") myMail.Subject = "RESPOSTA DO SUPORTE TECNICO DA MULTIPLUS" myMail.BodyFormat = 0 myMail.MailFormat = 0 myMail.Attachfile varanexo myMail.Body = HTML myMail.Send Set myMail = Nothing EnviarMail.Send End if '---------------- EMAIL DE SATISFAÇÃO DO USUARIO --------------- %> vrifique que você no enviaremail não colocou o corpo da mensagem que seria html.... <% EnviarMail.Body = HTML EnviarMail.Send %>

pagina.asp?var1=valor1&var2=valor2

posta seu codigo ai....

bom você deve ver o que tem no server que você hospeda..... eu quando uso upload já tenho meu script que tem uso para 5 componentes diferentes,... os mais comun dundas persists aspupload aspsmartuploas aspsimple upload safile upload... e mais um que não usa componentes..

enviar o email com conteudo em html e com o cartão em jpg... hehehhe ou enviar um codigo somente que abrirá o cartão no site...

você pode usar querys na sua pagina: veja stat=request.querystring("tipo") if stat<>"t" then 'mostrar todos stat=" where status='"&stat&"' " end if sql="select * from tabela "&stat&" order by id desc"

eu tenh um sistema desses prontos é o que eu utilizo em http://www.portalmaracaju.com.br me contacte calso tenha interrese

tire todas as condiçoes e rode um select de texte.... para exibir todo o conteudo da tabela...

o cdonts foi substituido pelo cdosys.... então alguns servers não enviam mais ou n~~ao recebem...