- Beranda
- Programmer Forum
no run like fox [sharing foxpro]
...
TS
wismbuh
no run like fox [sharing foxpro]
buat temen2 pengguna, pemerhati & pakar foxpro, mari kumpul disini.
daripada trit pada loncat kemanamana, kenapa tidak kumpul disini, this is our home!
kalo mo ask or share, mari gan.
daftar pengunjung:
wismbuh,wc_bukan_kafe,aberta,SwingerQueen,fauzijabbar,Vaaaan,GetFreak,magnumjkt,hunter_XV,attasiagian,seydaney dan masih akan bertambah gan
[Klik tulisan "Klik" untuk versi lengkapnya]
daripada trit pada loncat kemanamana, kenapa tidak kumpul disini, this is our home!
kalo mo ask or share, mari gan.
daftar pengunjung:
wismbuh,wc_bukan_kafe,aberta,SwingerQueen,fauzijabbar,Vaaaan,GetFreak,magnumjkt,hunter_XV,attasiagian,seydaney dan masih akan bertambah gan
[Klik tulisan "Klik" untuk versi lengkapnya]
- isu
- Self Running, RunTime ato foldernya ato kalo mo langusng bisa download installernya di sini.
- nyembunyiin SCREEN VFP
- login menggunakan user&password MySQL ato klik disini
- Persiapan CRUD dgn MySQL
- Report Listener & REPORT FORM
- INSERT FROM NAME
- tidak semua perintah dalam *.prg bisa untuk command prompt
- Text Merge
- INSERT..SELECT
- membaca file ini
- menampilkan isi tabel dalam form pake textbox
- Membuat Form Transparan
- membuat customize grid
- export ke excell menggunakan "macro", menggunakan cursor untuk keperluan export
- Filter berdasarkan absensi (jam masuk dan keluar)
- backup menggunakan software 7-zip
- ngePrint Barcode ato bikin barcode
- variabel alternatip dalam form, nggak perlu public..
- webcam
- mengeja huruf dan bersuara
- ebook
- SPT, SQL Pass Throught
- hurup bolak balik, kanan ke kiri
- coding pendeteksi error
- mapWindow, contoh penggunaanya klik disini
- enskripsi pake Cipher50.fll
- IP Address & login by IP
- cari file dengan wildcard sampe subfolder
- print langsung ke printer
- gammu
- menjalan eksternal exe yg keren
- start, stop servicenya windows
- tutorial, intermeso nih: vmWareThinApp
- mempercantik form
- Grid BerHalaman [[I]paging[/I]]
- entri 01/02/2011; diubah menjadi 1 Februari 2011
- menghapus data ganda
- mengarahkan record diatas sesuai pencarian
- PHP
- link download DeCompiler VFP
- bikin LOG gile
- Cloud Computing [vfp2iis & foxincloud]
- Membaca Registry Komputer lain
- Format Tanggal GMT
- ShutDown, Restart ddl [satu, dua dan tiga]
- Transaction SQL
- Class di PRG, bikin object
- bikin custom casting
- kirim email, cek internet & kirim email lagi.
- VFP2IIS (Direct Aplikasi Desktop To WEB)
- report ke excell
- report ke pdf atau pake PRIMO
Diubah oleh wismbuh 10-08-2013 17:23
nona212 memberi reputasi
1
159.6K
2.6K
Komentar yang asik ya
Mari bergabung, dapatkan informasi dan teman baru!
Programmer Forum
20.2KThread•4.9KAnggota
Tampilkan semua post
sembilanlangit
#2179
Quote:
mending install software PRIMO PDF aja gan...lebih mudah dan gak perlu coding, jadi ketika hendak mencetak dipilih dicetak ke primo PDF otomatis reportnya akan berbentuk PDF...coba di googling dlu...
Quote:
sebenernya mengubah dari tabel/cursor ke excel itu cukup mudah cukup copy to nama file type xl5
eror itu nongol gara-gara file excel nya lupa di tutup...jadi perlu validasi dlu sebelum perintah copy to excel dicek apakah file tersebut lagi dalam keadaan terbuka ato tidak...ane punya function mungkin bisa dicoba
Code:
\tFunction p_kefile(stypefile,nama,tujuan)
\tN=0 && file gagal terbentuk
*cek parameter
\tIf Empty(stypefile)
\t\tmessagebox('Isian type file tidak boleh kosong',16,'Perhatian'
\t\tReturn
\tElse
\t\tIf !Inlist(stypefile,'excel','dbf','txt'
\t\t\tmessagebox('Isian type file salah',16,'Perhatian'
\t\t\tReturn
\t\tEndif
\tEndif
\tIf Empty(nama)
\t\tmessagebox('Nama file harus diisi',16,'Perhatian'
\t\tReturn
\tEndif
*cek direktory tujuan
\tIf Empty(tujuan)
\t\tmessagebox('Direktory tujuan harus diisi',16,'Perhatian'
\t\tReturn
\tElse
\t\tIf !Directory(tujuan)
\t\t\tmessagebox('Isian tujuan belum ada foldernya',16,'Perhatian'
\t\t\tReturn
\t\tElse
\t\t\ttujuan=Iif(Right(tujuan,1)<>'\',tujuan+'\',tujuan)
\t\tEndif
\tEndif
\tDo Case
\tCase stypefile='excel'
\t\tTry
\t\t\tCopy To tujuan+nama+'.xls' Type Xl5
\t\t\tN=1
\t\tCatch To lanjut
\t\t\tmessagebox("File EXCEL BELUM DITUTUP, file tidak EXCEL tidak terupdate,tutup file excel, lalu ulangi proses ini",16,"Perhatian")
\t\t\tN=0
\t\t\tExit
\t\tEndtry
\tCase stypefile='dbf'
\t\tTry
\t\t\tCopy To tujuan+nama+'.dbf'
\t\t\tN=1
\t\tCatch To lanjut
\t\t\tmessagebox("File DBF BELUM DITUTUP, file tidak DBF tidak terupdate,tutup file excel, lalu ulangi proses ini",16,"Perhatian")
\t\t\tN=0
\t\t\tExit
\t\tEndtry
\tCase stypefile='txt'
\t\tTry
\t\t\tCopy To tujuan+nama+'.txt' Delimited With Tab
\t\t\tN=1
\t\tCatch To lanjut
\t\t\tmessagebox("File TXT BELUM DITUTUP, file tidak TXT tidak terupdate,tutup file excel, lalu ulangi proses ini",16,"Perhatian")
\t\t\tN=0
\t\t\tExit
\t\tEndtry
\tEndcase
\tReturn N
Quote:
Visual foxpro sangat OOP banget sekali....
coba mampir di blog ane gandi mari
disono ane paparin OOP di foxpro plus contohnya juga...
0