Arsip: FTP download

more 15 years ago
belajaraja
Salam,
Sebelumnya saya mau ngucapin MINAL AIDZIN WAL FAIDZIN, MOHON MAAF LAHIR DAN BATIN.
Saya ada masalah neh, temen* tolong bantu yah :
1. Gimana caranya program saya bisa download automatis dari FTP file dan saya letakkan di folder ? Pake cara apa yah ?
2. Gimana caranya agar ketika tanggal berubah, maka tanggal di prgram saya juga berubah secara otomatis. program ini saya install di server, jadi ngga pernah dimatikan.
Saya mohon banget yah di bantuin.
Terima kasih sebelumnya

more 15 years ago
cikumiyu
Menjawab pertanyaan yang ke:
1. Kalau mau mendownload melalui protokol ftp, coba pakai komponen ftp milik indy components. Sudah built-in sejak delphi 6. Masalah otomatis ya tinggal digunakan pada saat event yang mau dibuat otomatis. Misalnya pada saat pertama kali program dijalankan, atau pada setiap jam 13:00, dsb. Definisi otomatis ya tergantung dar definisi kamu sendiri.
2. Ini maksudnya kurang jelas. Coba lebih diperjelas lagi. Tanggal yang dimana yang berubah dan untu kkeperluan apa. :)

more 15 years ago
belajaraja
Makasih mas,
1. Saya belum pernah pake component nya Indy, bisa tolong di perjelas ngga mas atau kl mas punya bisa tolong berikan contoh programnya ? saya sangat membutuhkan program itu. Saya bukan ngga mau mencoba, tapi karena saya belum pernah coba pake Indy saya takut memakan waktu agak lama.
2. Misalkan gini :
Hari ini tanggal 2007-10-17, di aplikasi server, edit box nya akan menunjukkan tanggal tersebut. Ketika besok, edit box tersebut akan berubah tanggal nya otomatis menjadi 2007-10-18, jadi saya bisa mendownload file dari FTP untuk tanggal tersebut.
Semoga itu bisa lebih jelas. Saya mohon sekali bantuannya.
Terima kasih

more 15 years ago
mas_kofa
jawab no 2 :
bisa peke timer .......
procedure TForm1.Timer1Timer(Sender: TObject);
var j, m, d, p,t : word;
begin
decodetime(time,j,m,d,p);
t := j + m + d;
if t = 0 then // jam 00:00:00 atau pergantian hari
begin
edit2.Text := datetostr(date);
//////.............proses yg diinginkan
//////////////////////////
end;
end;
maaf jika kurang membantu..........
more 15 years ago
nurez
tinggal ambil jam dari sistem di server ajha.. tp codingnya di event on timer, trs edit2.Text := datetostr(date);
bisa koq.. dan intervalnya 500 di Ttimer

more 15 years ago
danieljun
uses /// - ...
IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
IdExplicitTLSClientServerBase, IdFTP, IdFTPListTypes, IdFTPList,
IdFTPListParseBase, IdObjs, IdException, IdAntiFreezeBase, IdAntiFreeze,
IdAllFtpListParsers,
DateUtils /// - ...
/// .... *
IdFtp1.Host := '127.0.0.1';
IdFtp1.Username := 'root';
IdFtp1.Password := 'ofallevil';
IdFtp1.ChangeDir('/theloveofmoney/');
l := TStringList.Create;
IdFtp1.List(l, '. ', True);
for i := 0 to IdFtp1.DirectoryListing.Count - 1 do
begin
TglFtp := idFtp1.FileDate( IdFtp1.DirectoryListing[i].FileName,False );
TimpaFileLama := True;
LanjutSebelumnya := False;
if DayBetween(TglFtp, Now) < 1 then
IdFtp1.Get(IdFtp1.DirectoryListing[i].FileName, 'NameFiletujuan', TimpaFileLama, LanjutSebelumnya );
end;
FIdFTP.Disconnect;

more 15 years ago
cikumiyu
1. Saya belum pernah pake component nya Indy, bisa tolong di perjelas ngga mas atau kl mas punya bisa tolong berikan contoh programnya ? saya sangat membutuhkan program itu. Saya bukan ngga mau mencoba, tapi karena saya belum pernah coba pake Indy saya takut memakan waktu agak lama.Akan lebih lama jadinya kalo kamu sendiri ngga mencoba. Tuh, yang dicontohkan @danieljun sepertinya sudah seperti yang kamu maksud. Tinggal waktuekeskusinya saja yang dibuat seperti yang kamu mau. :)

more 15 years ago
belajaraja
Salam
Akan lebih lama jadinya kalo kamu sendiri ngga mencoba. Tuh, yang dicontohkan @danieljun sepertinya sudah seperti yang kamu maksud. Tinggal waktuekeskusinya saja yang dibuat seperti yang kamu mau.Iya mas, saya sudah coba dan masih memodifikasi nya. Terima kasih banyak atas bantuannya.

more 15 years ago
belajaraja
Salam,
Saya sudah coba, tapi kok program di atas ngga bisa jalan yah ?? maaf saya baru sempet mencoba nya kemaren, buat temen yang lain ada yang bisa bantuin ngga ? tolong banget donk...really urgent please........
Terima kasih sebelum nya

more 15 years ago
danieljun
Program yang mana ya?
pakai Indy 10 untuk compile setelah memasukkan potongan source diatas kedalam 1 unit untuk testing.
perhatikan klausa uses ditambahkan ke komponen uses dalam form test
lalu source dibawahnya dimasukkan aja ke event Button.Click
more ...
reply |
Report Obsolete
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 2 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 3 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 10 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 10 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 10 years ago
Random Topic
- Need 4 Help (About Multiple Thread )
by Starboard in Tip n Trik Pemrograman more 17 years ago - membuat komponen
by peucang in Hal umum tentang Pascal Indonesia more 15 years ago - Export data ke file
by tAtA in Tip n Trik Pemrograman more 16 years ago - Format Date tanpa merubah regiional setting
by delphi_warrior in Tip n Trik Pemrograman more 14 years ago - Aplikasi Apotik
by andip70 in Hal umum tentang Pascal Indonesia more 16 years ago - nanya component
by yuan_carlos in Form Enhancement & Graphical Controls more 14 years ago - Format Waktu SQL Kosong.
by natan_stmp in MySQL more 10 years ago - Mempercepat proses pencarian data
by kabuki_enemy in Tip n Trik Pemrograman more 14 years ago - Absen dengan barcode
by nasbms in Tutorial & Community Project more 10 years ago - validasi di dbgrid
by peak08 in Tip n Trik Pemrograman more 11 years ago