Fórum Site feitos em delphi #283426

31/05/2005

0

alguem conhece algum site feito em delphi

Elcilei


Elcilei

Elcilei

Responder

Post mais votado

31/05/2005

estou fazendo este site aqui da Prefeitura de São Pedro da Aldeia, estou usando o delphi 2005 com banco de dados mysql com odbc.

http://www.pmspa.rj.gov.br


Rzcoimbra

Rzcoimbra
Responder

Gostei + 1

Mais Posts

31/05/2005

Fernando

http://www.ps.pe.gov.br/
http://www.gaiabrasil.com.br/ATOM.cgi
http://www.livrariasaraiva.com.br/

o melhor que ja vi foi o da saraiva

show de bola


Responder

Gostei + 1

31/05/2005

Elcilei

eles foram feitos em intraweb, algum em delphi.net


Responder

Gostei + 0

31/05/2005

Rjun

Não sei se há como saber se um site foi feito em Delphi, ou C# ou VB.NET, já que o que é enviado para o servidor é ASPX.


Responder

Gostei + 0

31/05/2005

Kitsystem

O polemico www.clubedelphi.com.br é feito em Delphi Intraweb


Responder

Gostei + 0

01/06/2005

Elcilei

ola rzcoimbra, achei seu muito bom, me responta como vc fez para que todas as vezes que clico em uma opcao ele permanece com as informacoes nas laterais e no meio muda, e o sequinte tem como vc me manda como faco para colocar em meu site tipo fala cidadao para enviar email. Parabens


ELcilei Lopes


Responder

Gostei + 0

01/06/2005

Rzcoimbra

Obrigado Elcilei,

to me matando pra deixar o site bacana, ainda falta muita coisa. O visual do site foi criado em Dreamweaver e Fireworks, com isso consigo trabalhar melhor o HTML, basicamente criei uma tabela com diversas células e essas áreas repetidas eu acabei dando um include de outro arquivo HTML. Se voce quiser posso mandar um exemplo mais detalhado por email. Com relação ao fala cidadao o codigo que usei foi esse:

procedure TWFfalacidadao.btnenviar_Click(sender: System.Object; e: System.EventArgs);
Var
  CommandEnviar : OdbcCommand;
  MensagemEmail : MailMessage;
begin
  CommandEnviar := OdbcCommand.Create(´INSERT INTO contato(CONTATO_NOME, CONTATO_EMAIL, CONTATO_MENSAGEM, CONTATO_ORIGEM) VALUES ("´ + txtnome.Text + ´", "´ + txtemail.Text + ´", "´ + txtmensagem.Text + ´", "´ + txtorigem.Value + ´")´, Connection);
  Connection.Open();
  CommandEnviar.ExecuteNonQuery;
  Connection.Close();
  MensagemEmail := MailMessage.Create;
  MensagemEmail.From := txtnome.Text + ´<´ + txtemail.Text + ´>´;
  MensagemEmail.&To := ´destino´;
  MensagemEmail.Bcc := ´destino2´;
  MensagemEmail.Subject := ´assunto´;
  MensagemEmail.BodyFormat := MailFormat.Html;
  MensagemEmail.Body := txtmensagem.Text;
  MensagemEmail.UrlContentBase := ´http://www.pmspa.rj.gov.br/imagens´;
  SmtpMail.SmtpServer := ´servidor stmp´;
  SmtpMail.Send(MensagemEmail);
  txtnome.Text := nil;
  txtemail.Text := nil;
  txtmensagem.Text := nil;
  Response.Redirect(´emailenviado.aspx´);
end;



Responder

Gostei + 0

01/06/2005

Elcilei

muito obrigado, meu email elcilei@brfree.com.br, to com problema fiz um site em delphi8 no internet explore ele roda beleza mas no mozila do linux nao fica beleza pois quando uso labe com fundo colorido nao aparece e outras. Vc sabe como faco resultado de uma pesquisa em db como essa igual a do cd , aparece um link e abaixo a descricao com a palavra em netrito:

[u:b6f7dfe61b]Acesita Acos[/u:b6f7dfe61b]
Empresa que trabalha no ramo de [b:b6f7dfe61b]aco[/b:b6f7dfe61b] inox

tipo assim

Abracos

Elcilei Lopes


Responder

Gostei + 0

01/06/2005

Rzcoimbra

cara com relação a pesquisa vou ficar te devendo pois ainda nao fiz a minha, este é o primeiro site que estou montado em asp.net entao estou apanhando mais do que ladrão...
Voce tem o link para que eu possa ver esse problema do mozila??

Estou mandando o exemplo da table por email


Responder

Gostei + 0

01/06/2005

Elcilei

[url]http://www.ondecomprarnasuacidade.com.br/realminas.aspx[/url]

nao consequi execultar rotina enviar email, tem como vc me mandar os arquivos *.pas e *.aspx

Grato


Responder

Gostei + 0

01/06/2005

Rzcoimbra

qual erro que deu?? pode ser que o servidor necessite de autenticação do smtp. ainda nao consegui fazer isso.


Responder

Gostei + 0

02/06/2005

Elcilei

deu erro nesta linha
INTO contato(CONTATO_NOME, CONTATO_EMAIL, CONTATO_MENSAGEM, CONTATO_ORIGEM) VALUES (´´ + txtnome.Text + ´´, ´´ + txtemail.Text + ´´, ´´ + txtmensagem.Text + ´´, ´´ + txtorigem.Value + ´´)´, Connection);

tenho que colocar quais componentes


Responder

Gostei + 0

02/06/2005

Rzcoimbra

vamos lá...

que banco de dados está usando?? que tipo de conexao ??


Responder

Gostei + 0

02/06/2005

Elcilei

acess, bdp


Responder

Gostei + 0

02/06/2005

Rzcoimbra

manda o codigo do .pas inteiro para poder dar uma olhada.... Desculpe a demora para identificar o problema, mas estou começando no Delphi e no asp.net, estou vindo do php que é bem diferente.


Responder

Gostei + 0

02/06/2005

Elcilei

na verdade nao estou sabendo como vazer esta pagina


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar