Fórum 2 perguntas table e backup #132808

04/02/2003

0

acho q essa eh simples: mostrar quanto registros tenho ma minha tabela, e como gerar um código automático, e que seja crescente não repetido;

outra pergunta eh: queria clicar num botao e que todo o conteudo de todas as tabelas existentes no meu projeto seje gravado num diskette A:\, ou se no caso só o que foi acrescentado de novo nas tabelas, pra maun ficar muito pesado, seria uma rotina diária no fechamento do comércio, pois presciso atualizar as informações das tabelas para outro micro ....


Alguem poderia me dar essa força????

Fico muito grato desde já!


Thiago

Thiago

Responder

Posts

04/02/2003

Anonymous

Estou com um problemão: Vejam só
Estou usando o componente NMHTTP da palheta fastnet:
No evento onclick do botão coloco o seguinte:

NMHTTP1.InputFileMode := False;
NMHTTP1.OutputFileMode := False;
Memo1.Lines.Clear;
Memo2.Lines.Clear;

vls_endereco := ´http://teste/carregadados.asp´;
NMHTTP1.POST(vls_endereco, ´Teste´);


No retorno desta pagina, via browser, mostra uma mensagem ´Sucesso´ ou ´Insucesso´ . O código fonte desta página carregadados.asp é
<html>
<body>
<h1>Carga de Dados</h1><br><br>
<form action=CarregaDados.asp method=post>
Conteudo do Arquivo:<BR><textarea name=Arquivo cols=70 rows=10></textarea>
<input type=submit name=Envia Value=Envia>
</form>
</body>
</html>



NO evento Sucess do componente NMHTTP
Coloco o seguinte comando:

case Cmd of
CmdPOST:
begin
//capturar conteúdo da página
Memo1.Text := NMHTTP1.Header;
Memo2.Text := NMHTTP1.Body;
end;
end;

O problema é que o memo2.text deveria retornar ´Sucesso´ ou ´Insucesso´
porém me retorna o código fonte mencionado acima.

Por favor me ajudem!!!!!!


Responder

Gostei + 0

04/02/2003

Anonymous

acho q essa eh simples: mostrar quanto registros tenho ma minha tabela, e como gerar um código automático, e que seja crescente não repetido; outra pergunta eh: queria clicar num botao e que todo o conteudo de todas as tabelas existentes no meu projeto seje gravado num diskette A:\, ou se no caso só o que foi acrescentado de novo nas tabelas, pra maun ficar muito pesado, seria uma rotina diária no fechamento do comércio, pois presciso atualizar as informações das tabelas para outro micro .... Alguem poderia me dar essa força???? Fico muito grato desde já!

Número de registros de uma tabela: table1.recordcount ;


Responder

Gostei + 0

04/02/2003

Dor_poa




Responder

Gostei + 0

06/02/2004

Regisgl1

Nao inclua nada no evento OnSucess, ele serve para indicar o status.


Digite o codigo desta maneira que da certo.

NMHTTP1.InputFileMode := False;
NMHTTP1.OutputFileMode := False;
Memo1.Lines.Clear;
Memo2.Lines.Clear;
vls_endereco := ´http://teste/carregadados.asp´;
NMHTTP1.POST(vls_endereco, ´Teste´);
Memo1.Text := NMHTTP1.Header;
Memo2.Text := NMHTTP1.Body;

Até.


Responder

Gostei + 0

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

Aceitar