maikel

Olá amigo Você adicionou o caminho das fontes do componente no Library Path do delphi?? (Tools - Optins). Me parece que esse erro ai acontece quando ele não encontrou as fontes do projeto do componente. Outra coisa, qual é a versão do componente que você está instalando? se for a versão RC2, tem um arquivo leia-me junto que explica os detalhes da instalação. Quanto ao uso do componente no projeto, tome cuidado quanto ao form ou dataModule onde você tem o componente de conexão com o banco de dados, que deverá ser criado antes que o form onde está o UserControl. (Projet - Options). Ve ai se isso te ajuda, qualquer coisa ou outro erro Post ai de novo. Att

Olá Bom, olhando sua sql, vi que está esquecendo de um detalhe, o uso da vírgula para separação dos parâmetros de valores que a eles está atribuindo. Veja: Dados.SQLQueryAltera.SQL.Add('Update clientes set ' + 'Data = ' + QuotedStr(EditData.Text) +', '+ 'Razao_social = ' + QuotedStr(EditRazao.Text) +', '+ 'Nome_fantasia = ' + QuotedStr(EditFantasia.Text) +', '+ 'Endereco = ' + QuotedStr(EditEndereco.Text) +', '+ 'Bairro = ' + QuotedStr(EditBairro.Text) +', '+ 'Cidade = ' + QuotedStr(EditCidade.Text) +', '+ 'Estado = ' + QuotedStr(EditEstado.Text) +', '+ 'CEP = ' + QuotedStr(EditCEP.Text) +', '+ 'CNPJ = ' + QuotedStr(EditCNPJ.Text) +', '+ 'IE = ' + QuotedStr(EditIE.Text) +', '+ 'Telefone = ' + QuotedStr(EditTelefone.Text) +', '+ 'Fax = ' + QuotedStr(EditFax.Text) +', '+ 'Email = ' + QuotedStr(EditEmail.Text) +', '+ 'Contato = ' + QuotedStr(EditContato.Text) +', '+ 'Observacao = ' + QuotedStr(EditObs.Text) +', '+ ' where Codigo= ' + EditCodigo.Text'); Use a sql na forma como ela está acima, note que adicionei ', '+ em todas as linhas e removi o ponto e vírgula que estava usando após passar o valor para a cláusula where. Creio que isso ai deverá solucionar o problema no update. Qualquer coisa, post ai de novo o resultado. Att Errata: 'Observacao = ' + QuotedStr(EditObs.Text) +', '+ ' where Codigo= ' + EditCodigo.Text'); Está sobrando o ', '+ da linha onde passa o valor ao parâmetro Observacao. Não existe "," entre o último parâmetro e o where Att

Olá amigo.... Estou sem tempo para testar agora....mas veja se seu erro não está na string de formatação... mm -> minusculo = minutos MM -> maiúsculo = meses Tente usar assim: Add (#39 + FormatDateTime ('MM/dd/yyyy', StrToDate (txtnas.Text)) + #39); Creio que este poderá ser seu problema, sendo que quando você usa "mm" ele retorna o mês como sendo 00, dando assim data inválida. Qualquer coisa, post ai de novo... At

Opa... pelo que deu pra entender deve haver algum erro de segurança ou algo relacionado com níveis de acessos ou permissões para que seja executada a aplicação. O erro que está retornando na página é um erro tratato, ou seja, não tem informações técnicas que seriam necessárias para dar um diagnóstico mais convincente da falha. Como mostra no próprio browse, localize na sua aplicação o arquivo web.config, use o notepad para editá-lo e localize nele a seguinte tag: <configuration> <system.web> <customErrors mode="Off"/> </system.web> </configuration> Note que o <customErrors mode="Off"/> está Off, ou seja, não mostra erros técnicos no browse. Altere para On, salve o arquivo e execute a página novamente. Certamente irá aparecer uma descrição técnica do problema. Se necessário, volte a postar a nova mensagem obtida após a edição do arquivo web.config. Depois que concertado o erro, volte editar o arquivo voltando opara Off. Att

Ops... Que componentes você está utilizando? Se estiver usando ClientDataSet, pode usar a função Locate do mesmo. Para abrir em nova aba, basta no evento Ao Clicar da linha do DBGrid chamar a janela onde estao os componentes para edição, sendo que todos devem estar ligados ao mesmo ClientDataSet através de componentes DataSource. Att Maikel

Sim... em ambos está com o mesmo nome...porém não está funcionando... Se tiver outra sugestão.. agradeço Att Ops.... encontrei onde estava o problema!! Eu estou usando a versão 2007 do access, e somente neste ai que não funcionou da maneira que o colega MrMALJ sugeriu, fiz outros testes no access 2003 e no 2000 e funcionou perfeitamente em todos eles.... Creio que seja de outra maneira para fazer isto no access 2007... mas por enquanto.... PROBLEMA RESOLVIDO!!! MrMALJ, valeu pela força. Att Maikel

Olá MrMALJ Valeu pela resposta... Eu continuo com a dificuldade... tentei fazer conforme você me sugeriu, mas não funcionou... Fiz o seguinte: Campo1 Campo2 CampoSoma No evento Após Atualizar do campo2 coloquei o seguinte código: me.CampoSoma.Value = Me.Campo1 + Me.Campo2 Só que ele não está nem mostrando a soma no CampoSoma do formulário nem salvando na tabela... É dessa maneira o correto ou como seria para fazer?? Add você no MSN...

Olá galera... Estou somando 6 valores de caixas de texto de formulários carregados, e no final tenho um campo Valor Total que está exibindo no formulário carregado o resultado correto da soma, porém não está gravando na tabela da base. Como faço para salvar esse resultado na tabela, para poder gerar relatórios contendo esse valor. Aguardo... Agradeço a quem puder ajudar... Att

Olá mas de que forma você quer isso funcione... você quer adicionar um endereço e quando clicar nele abrir o programa?? Não entendi o que você quis dizer com "add um programinha" Ou você quer juntar os arquivos de dois sistemas em um só? Post ai de novo explicando o que você qr fazer.... att

Muito legal sua explicação.... Porém ficou uma dúvida.. se puder ajudar... Abro a página em 3 computadores... e aparecem 3 usuários online, mas se eu fechar e página em um pc a página continua com 3 usuários online.... se se abrir a página de novo nesse pc.... irá aparecer com 4 usuários online... ou seja, ele não consegue limpar o usuario que fecha a página.... não executa Session_End... Fiz exatamente como você explicou... o que pode estar ocorrendo?? O que preciso fazer para conseguir executar o que está no Session_End?? Se puder ajudar agradeço.... Att

Bom Dia Novidades aparecendo por ai... vejam as inovações da CodeGear(Delphi) em relação ao php. Artigo original disponivel em: http://www.activedelphi.com.br/modules.php...cle&sid=482 //-------------------------------------------------------------------------------------------------------------------------------------- Os novos produtos CodeGear que foram anunciados esta semana, em 20 de fevereiro de 2007, mostram o quanto estão preocupados com a necessidade do desenvolvedor. Após um final de ano bastante corrido para a subsidiária da Borland, eles afirmam: "Nós ouvimos", e por isso criaram o Delphi 2007 exclusivamente para Win32 e o Delphi for PHP. Dentre as novidades, o Delphi Spacely ou Delphi 2007 destaca-se com suporte ao Windows Vista, tanto para desenvolvimento quanto para distribuição de aplicativos nele feitos, uso nativo da tecnologia AJAX nos componentes Web, suporte ao MSBuilder, novo DBExpress 4 e ainda total compatibilidade com versões anteriores. Você poderá ver mais detalhes no post original, em http://www.codegear.com/AboutUs/News/Delph...40/Default.aspx http://www.codegear.com/Products/Delphi/De...36/Default.aspx (Imagens) Quanto ao Delphi Astro ou Delphi para PHP, a nova ferramenta parece ser tudo que um programador delphi sempre sonhou quando teve que programar nesta linguagem. Eu mesmo já passei por vários editores PHP, alguns muito bons, mas estou ancioso para conhecer esta nova ferramenta, que além do desenvolvimento RAD que a IDE nos oferecerá, terá suporte aos bancos de dados mais conhecidos como MySQL, MS SQLServer, InterBase e Oracle, com programação Drag and Drop, componentes VCL 100% escritos em PHP, baseados nos scripts e bibliotecas open source mais conhecidos, como Qooxdoo, Adodb, DynAPI, Smarty, XAjax e JSCalendar (que estarão disponíveis no sourceforge.net), distribuição em Windows, Linux, Solaries, entre outros, edição e depuração integrados, e claro, todos os recursos que a IDE do Delphi pode oferecer, como Code Insight, Code Explorer, and Code Templates. Um vídeo de introdução ao Delphi PHP foi feito, em Inglês. Mais detalhes em: http://www.codegear.com/AboutUs/News/Delph...39/Default.aspx http://www.codegear.com/products/delphiforphp (Imagens) Não se esqueçam que em Março haverá a CodeRage 2007, uma conferência 100% online e 100% free da CodeGear. Informe-se! Opinião Pessoal E mais uma vez escrevo: A separação das linhas IDEs e ALM da Borland só tem a nos ajudar! Já está mais do que provado que a nova subsidiária está 101% focado em nós, desenvolvedores, criando novas ferramentas e aprimorando as existentes para a nossa real necessidade. É claro que ainda há muito a ser melhorado, e tenho certeza que será. Fique ligado em nosso site e nos sites da CodeGear e CodeGear Developer NetWork. Estarei publicando as novidades na medida do possível! Forte Abraço e Até a Próxima! Kelver Merlotti - Coordenador Editorial Contato: kelver@activedelphi.com.br //-------------------------------------------------------------------------------------------------------------------------------------- Comentem seu ponto de vista... Att

Bom dia Graymalkin Agradeço novamente pela sua ajuda.... naveguei pelo link que você me passou e tentei encontrar a solução para o meu problema... porém não consegui me identificar com a linguagem usada ao responder o tópico aberto, fiz então um novo post, segue link para acompanhamento: http://forum.magicajax.net/forums/thread/1355.aspx Bom..... como não havia recebido nenhuma resposta.... novamente voltei ao meu Delphi e tentei eu mesmo implementar alguns códigos.... e alterações... acabei eu mesmo achando uma solução. Selecionando o AjaxPanel, o mesmo possui a propriedade ExcludeFlags, que estava selecionada como NONE, onde a alterei para Fingerprints. Confesso que não sei o que essa propriedade faz.... se alguém souber... por favor responda aqui neste tópico... mas foi essa modificação que resolveu meu problema... Att

Bom Dia Graymalkin... Agradeço pela atenção em responder ao tópico... porém não sei se estou fazendo da maneira correta essa codificação, estou usando da seguinte maneira no arquivo web.config: <configuration> <system.web> <globalization fileEncoding="utf-8" requestEncoding="utf-8" responseEncoding="utf-8" culture="pt-PT" uiCulture="pt-PT" /> </system.web> </configuration> Dessa forma não mudou nada meu problema.... ai pesquisei um pouco na Internet e encontrei uma dica que mandava usar essa codificação na própria página, implementei meu código deixando o register da minha página dessa forma: <%@ Page language="c#" Debug="true" Codebehind="atendimento_chamado.pas" AutoEventWireup="false" Inherits="atendimento_chamado.TWebForm1" validateRequest="false" UICulture="pt-PT" Culture="pt-PT" %> Novamente continuou dando o mesmo erro... Cada vez que submeto a página, troca todas as palavras acentuadas por caracteres loucos... veja com a palavra Observações: 1 - Observações 2 - Observa&amp;#231;&amp;#245;es 3 - Observa&amp;amp;#231;&amp;amp;#245;es Fiz então o último teste, tirei novamente o AjaxPanel, executei a página, e a mesma funcionou normalmente, porém bem mais lerda que com o ajax.... Se alguém tiver alguma outra dica de como eu possa resolver esse problema, utilizando o AjaxPanel.. agradeço... T+

Buenas amigos... Seguinte... to fazendo uma aplicação em asp.net com delphi 2006 e banco de dados firebird, e nesta aplicação estou utilizando os recursos do ajax através do componente MajicAjax, porém estou enfrentano um problema ao utiliza-lo. Toda vez que aparece uma palavra acentuada em um textbox, e o ajax submete a área, ocorre que esse caracter acentuado é substituío por uma série de caracteres loucos.. vejam como fica a palavra Cópia: --> CÓPIA Fiz um teste a pouco e tirei o AjaxPanel desta pagina, fazendo com a mesma funcionasse corretamente... sem alterar nenhum caracter... O mesmo erro acontece mesmo quando o textbox já vem preenchido com informações do banco de dados ou mesmo quando as digito na página.... Alguém ai já teve um problema parecido com esse componente... o que posso fazer para resolver isso... se alguém souber e puder me ajudar, agradeço... Att

E ai galera... Seguinte... to fazendo uma pagina html e preciso colocar um formulário nessa página, o qual devera enviar um email para um contato... gostaria de saber se alguém ai tem um exemplo de como posso fazer isso.... Desde já agradeço a quem ajudar... T+ Maikel

Cara.... isso é problema do IIS com o .NET Framework... veja se te ajuda: http://www.linhadecodigo.com.br/artigos.asp?id_ac=573 Att

Ola amigo... Bom, não trabalho com access, mas em firebird uso a seguinte sql para fazer isso: SELECT PESSOAS.NOME_PESSOA, PESSOAS.DATA_NASC FROM PESSOAS WHERE ( (EXTRACT(MONTH FROM PESSOAS.DATA_NASC) between '5' and '6') and (EXTRACT(day FROM PESSOAS.DATA_NASC) between '1' and '31') ) Que pega todos os aniversariantes do mês 5 e 6 entre os dias 1 e 31... Tenta usar ai no access pra ver se funciona.... espero ter ajudado... T+

Olá.... É sim.... não sei que banco de dados você utiliza, mas eu uso Firebird e uso sempre essa sql... Até porque não tem como você definir que quer apagar só o valor de uma coluna, mas sim, quando envia um comando de exclusão refere-se ao registro todo com aquele ID... T+

sim.... deve ser mesmo esse erro da referencia da dll... mas já recompilei o projeto... e não funcionou... por fim criei um projeto novo... coloquei primeiro todas as dll's dentro da pasta bin e depois referenciei elas.... para que buscassem sempre nessa pasta.. e depois importei todas as outras páginas.... mas não mudou em nada. Também já cheguei a pensar que o problema seria no servidor... estou hospedando no speedserv.com.br, mas entrei em contato com eles e me falam que no servidor deles não é.... Eu to sem saber o que fazer... to mais de uma semana tentando resolver isso e não funciona... testei em outra máquina minha aqui.... e nesta funcionou normal... Att

Olá Kuroi... Obrigado por ajudar.... mas ainda não consegui resolver o problema... adicionei a chave no web.config e persiste o mesmo erro a seguir: The located assembly's manifest definition with name 'Borland.Data.Provider' does not match the assembly reference. Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code. Exception Details: System.IO.FileLoadException: The located assembly's manifest definition with name 'Borland.Data.Provider' does not match the assembly reference. Source Error: [No relevant source lines] Source File: vbqgird9.0.vb Line: 38 Assembly Load Trace: The following information can be helpful to determine why the assembly 'Borland.Data.Provider' could not be loaded. === Pre-bind state information === LOG: DisplayName = Borland.Data.Provider, Version=2.5.0.0, Culture=neutral, PublicKeyToken=91d62ebb5b0d1b1b (Fully-specified) LOG: Appbase = file:///C:/Domains/tasteclub.com.br/wwwroot/arquivos LOG: Initial PrivatePath = bin Calling assembly : tasteclub, Version=1.0.2519.41863, Culture=neutral, PublicKeyToken=null. === LOG: Publisher policy file is not found. LOG: No redirect found in host configuration file (C:\Windows\Microsoft.NET\Framework\v1.1.4322\aspnet.config). LOG: Using machine configuration file from C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\config\machine.config. LOG: Post-policy reference: Borland.Data.Provider, Version=2.5.0.0, Culture=neutral, PublicKeyToken=91d62ebb5b0d1b1b LOG: Attempting download of new URL file:///C:/Windows/Microsoft.NET/Framework/v1.1.4322/Temporary ASP.NET Files/arquivos/77fa85c8/4047fd80/Borland.Data.Provider.DLL. LOG: Attempting download of new URL file:///C:/Windows/Microsoft.NET/Framework/v1.1.4322/Temporary ASP.NET Files/arquivos/77fa85c8/4047fd80/Borland.Data.Provider/Borland.Data.Provider.DLL. LOG: Attempting download of new URL file:///C:/Domains/tasteclub.com.br/wwwroot/arquivos/bin/Borland.Data.Provider.DLL. WRN: Comparing the assembly name resulted in the mismatch: Minor Version Stack Trace: [FileLoadException: The located assembly's manifest definition with name 'Borland.Data.Provider' does not match the assembly reference.] Global.TGlobal.InitializeComponent() +0 Global.TGlobal..ctor() ASP.Global_asax..ctor() in vbqgird9.0.vb:38 [TargetInvocationException: Exception has been thrown by the target of an invocation.] System.RuntimeType.CreateInstanceImpl(Boolean publicOnly) +0 System.Activator.CreateInstance(Type type, Boolean nonPublic) +66 System.RuntimeType.CreateInstanceImpl(BindingFlags bindingAttr, Binder binder, Object[] args, CultureInfo culture, Object[] activationAttributes) +664 System.Activator.CreateInstance(Type type, BindingFlags bindingAttr, Binder binder, Object[] args, CultureInfo culture, Object[] activationAttributes) +200 System.Web.HttpApplicationFactory.GetSpecialApplicationInstance() +160 System.Web.HttpApplicationFactory.FireApplicationOnStart(HttpContext context) +20 System.Web.HttpApplicationFactory.Init(HttpContext context) +497 System.Web.HttpApplicationFactory.GetApplicationInstance(HttpContext context) +170 System.Web.HttpRuntime.ProcessRequestInternal(HttpWorkerRequest wr) +414 Agradeço se puder ajudar Att

E ai galera... tudo beleza... Seguinte.. terminei uma aplicaçao em asp.net 1.1 e coloquei nos servidores da speedserv para hospedar... uso banco de dados ms sql e coloquei todos arquivos via ftp no dominio. Acessei pelo painel de controle e configurei bem certinho o diretorio virtual.. tudo nos conformes... porem quando acesso meu site, que esta neste endereço http://www.tasteclub.com.br/arquivos/ ele retorna um erro de dll, que está dentro da pasta bin e não sei o porque deste erro. Até já gerei uma nova aplicaçao e importei todas as outras páginas... mas continua o mesmo erro... na mesma Borland.Data.Provider.... já procurei por instanca de caminho e tal... mas não achei nada.. Por favor... acessem o endereço http://www.tasteclub.com.br/arquivos/ e se alguém puder me ajudar a resolver esse problema.. fico muito agradecido... Conto com a ajuda de você's amigos... Obrigado Att

Olá bareta Valeu pela ajuda... procurei pelo codsys e achei o seguinte artigo: http://suporte.hostsys.com.br/Customer/KBA...spx?articleid=3 imlementei o código e funcionou beleza... Vlw.. T+

Bom Dia colegas.... Seguinte, eu tenho um arquivo de uma página para enviar e-mail, só que na hora que dou o post na página e que deveria mandar o e-mail, dá o seguinte erro: Tipo de erro: (0x8004020E) Não é possível modificar ou excluir um objeto que tenha sido adicionado com o uso do COM+ Admin SDK /mailasp/enviamail.asp, line 92 Não sei se o erro é devido o meu servidor smtp, uso o terra. As linhas de autenticação de usuário e senha não estavam no script, implementei-as conforme um artigo que encontrei na web... e não tenho certeza que estejam corretas... Estou colocando o código abaixo... se alguém puder me ajudar... a mandar esse e-mail autenticado em um servidor smtp agradeço.. <body> <% 'Response.End nome = Request.Form("Nome") tel = Request.Form("telefone") email = Request.Form("Email") frase = Request.Form("mensagem") empresa = Request.Form("empresa") servidor = "200.154.55.5" resposta = Replace(frase,vbcrlf,"<br>") texto = "<table width=""500"" border=""0"" cellspacing=""2"" cellpadding=""2"" align=""center"">" & vbcrlf &_ " <tr>" & vbcrlf &_ " <td width=""200"" align=""center"" bgcolor=""6D6D6D""> <strong><font size=""2"" face=""Arial, Helvetica, sans-serif"" color=""white"">Nome</font></strong></td>" & vbcrlf &_ " <td width=""300"" bgcolor=""#E3E3E3""><font size=""2"" face=""Arial, Helvetica, sans-serif"">"& nome &" </font></td>" & vbcrlf &_ " </tr>" & vbcrlf &_ " <tr>" & vbcrlf &_ " <td width=""200"" align=""center"" bgcolor=""6D6D6D""> <strong><font size=""2"" face=""Arial, Helvetica, sans-serif"" color=""white"">Telefone</font></strong></td>" & vbcrlf &_ " <td width=""300"" bgcolor=""#E3E3E3""><font size=""2"" face=""Arial, Helvetica, sans-serif"">"& empresa &" </font></td>" & vbcrlf &_ " </tr>" & vbcrlf &_ " <tr>" & vbcrlf &_ " <td width=""200"" align=""center"" bgcolor=""6D6D6D""> <strong><font size=""2"" face=""Arial, Helvetica, sans-serif"" color=""white"">Telefone</font></strong></td>" & vbcrlf &_ " <td width=""300"" bgcolor=""#E3E3E3""><font size=""2"" face=""Arial, Helvetica, sans-serif"">"& tel &" </font></td>" & vbcrlf &_ " </tr>" & vbcrlf &_ " <tr>" & vbcrlf &_ " <td width=""200"" align=""center"" bgcolor=""6D6D6D""> <strong><font size=""2"" face=""Arial, Helvetica, sans-serif"" color=""white"">Email</font></strong></td>" & vbcrlf &_ " <td width=""300"" bgcolor=""#E3E3E3""><font size=""2"" face=""Arial, Helvetica, sans-serif"">"& email &" </font></td>" & vbcrlf &_ " </tr>" & vbcrlf &_ " <tr>" & vbcrlf &_ " <td align=""center"" bgcolor=""#6D6D6D""> <strong><font size=""2"" face=""Arial, Helvetica, sans-serif"" color=""white"">Mensagem</font></strong></td>" & vbcrlf &_ " <td bgcolor=""#E3E3E3""><font size=""2"" face=""Arial, Helvetica, sans-serif"">"& resposta &" </font></td>" & vbcrlf &_ " </tr>" & vbcrlf &_ " </table><br><br>" 'Cria o objeto para o envio de e-mail Set objCDOSYSMail = Server.CreateObject("CDO.Message") 'Cria o objeto para configuração do SMTP Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration") 'SMTP objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = servidor 'Porta do SMTP objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= 25 'Porta do CDO objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/username") = "usuario" objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/password") = "senha" 'Timeout objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30 objCDOSYSCon.Fields.update 'Atualiza a configuração do CDOSYS para o envio do e-mail Set objCDOSYSMail.Configuration = objCDOSYSCon 'E-mail do remetente. Você pode indicar no formato: ' Nome <e-mail@dominio> ou somente o e-mail objCDOSYSMail.From = "suporte@ricohpel.com.br" 'E-mail do destinatário. Você pode indicar no formato: ' Nome <e-mail@dominio> ou somente o e-mail objCDOSYSMail.To = "maikelscheid@gmail.com.com.br" 'E-mail do destinatário. Você pode indicar no formato: ' Nome <e-mail@dominio> ou somente o e-mail objCDOSYSMail.CC = "maikel@ricohpel.com.br" 'Assunto da mensagem objCDOSYSMail.Subject = "Contato - Ricohpel" 'Conteúdo da mensagem 'objCDOSYSMail.TextBody = "<br><br>"&texto&"<br>" 'para envio da mensagem no formato html altere o TextBody para HtmlBody objCDOSYSMail.HtmlBody = "<br><br>"&texto&"<br>" objCDOSYSMail.fields.update 'Envia o e-mail objCDOSYSMail.Send 'Destrói os objetos Set objCDOSYSMail = Nothing Set objCDOSYSCon = Nothing response.write "<script>alert('Mensagem Enviada com Sucesso!!')</script>" response.write "<script>window.location=('192.168.0.102')</script>" %> </body>

Bom dia... Alguém conhece algum outro componente que possa ser instalado em delphi 2006 for .net que envie emails autenticados por smtp, ou alguma função que faça isso. Tenho a função normal usando a classe System.Web.Mail, mas esta não envia emails autenticados... Agradeço a quem puder ajudar... Att

Olá... Graymalkin... valeu pela força.... vou tentar adaptar a dll com o asp.net do delphi 2006... estou com algumas dificuldades.... pois pela lógica.. para usar um objeto externo... para criar ele seria uma variavel do tipo variant e depois para usar seria Nomevariant := CreateObject('NOME OBJETO'); mas em .net não estou conseguindo fazer isso... não consigo criar o objeto.... se alguém souber como faço para criar um objeto no bds2006 for .net, por favor me ajude... Agrdeço a atenção... Att