Do CreateINI

Local cFile
cFile = “c:\sampleini.ini”
=MakeFile(cFile)

= WritePrivateProfileSection (”One”,;
“ID=001″ + Chr(0) +”Path = c:”+CHR(0) ,;
cFile)
= WritePrivateProfileSection (”Two”,;
“ID=002″ + Chr(0) +”Path = d:”+CHR(0) ,;
cFile)
= WritePrivateProfileSection (”Three”,;
“ID=003″ + Chr(0) +”Path = e:”+CHR(0) ,;
cFile)

PROCEDURE  MakeFile (cFile)
IF FILE (cFile)
DELETE FILE (cFile)
ENDIF

hFile = FCREATE (cFile)
= FCLOSE (hFile)

PROCEDURE  CreateINI
DECLARE WritePrivateProfileSection IN kernel32;
STRING lpAppName,;
STRING lpString,;
STRING lpFileName

DECLARE WritePrivateProfileString IN kernel32;
STRING lpAppName,;
STRING lpKeyName,;
STRING lpString,;
STRING lpFileName

enjoy it…!
source

Gammu adalah semacam service yang bisa digunakan sebagai SMS Gateway. Kelebihan gammu antara lain multi platform (Linux,Windows) dan aplikasi SMS Gateway bisa dibangun dari berbagai bahasa program seperti PHP, Java, VFP, Delphi,VB dll. Seperti judul diatas, tentu saja disini saya menggunakan VFP (Visual Foxpro) sebagai interface aplikasi SMS Gateway. J

Step 1

Download file gammu for windows disini. (saya menggunakan versi 1.09.00)

Step 2

Ekstrak file gammu di sebuah folder Anda, misalnya c:\gammu

Step 3

Setting konfigurasi Gammu dengan mengedit file gammurc :

[gammu]

port =

(isi sesuai port yang dikenali HP saat terhubung dengan computer dan akhiri dengan tanda :)

connection =

Jenis koneksi HP. Selengkapnya bisa dilihat disini

Contoh konfigurasi saya dengan menggunakan HP Sony Erricson W200i

[gammu]

Port = com14:

Connection = AT115200

Tes koneksi dengan mengetik command dos prompt :

Gammu –identify

Jika berhasil akan muncul seperti ini:

Manufacturer : Sony Ericsson

Model : unknown (AAB-1022044-BV)

Firmware : R4JA011

IMEI : 359703216549870

SIM IMSI : 510132165498701

Step 4

Setting konfigurasi SMS Daemon.

Ubah file smsdrc pada bagian :

[gammu]

Port = diisi sesuai dengan port pada file gammurc

[smsd]

PIN = isi nomor PIN kartu jika Sim Card memelukan nomor PIN

– setting for –smsd MYSQL—-

User = root

Password = passwordroot

Pc = localhost

Database = smsd

Step 5

Membuat database smsd. File dump (ber-extension .sql) untuk membuat table-table sudah disediakan gammu dan bisa dijalankan menggunakan phpmyadmin ataupun tools mysql lain.

Step 6

Menjalankan Gammu sebagai service. Ketik di dos prompt:

Gammu –-smsd MYSQL smsdrc

Jika berhasil akan muncul di dos prompt :

Press Ctrl+C to stop the program………

– bersambung–

Here is some code to terminate active windows application with visual foxpro :

oWMI = GETOBJECT(’winmgmts://’)
cQuery = “select * from win32_process where name=’calc.exe’”
oResult = oWMI.ExecQuery(cQuery)
? oResult.Count
FOR EACH oProcess IN oResult
? oProcess.Name
oProcess.Terminate(0)
NEXT

source

Ada beberapa hal yang sebaiknya dilakukan dan tidak dilakukan dalam pemrograman Visual Foxpro.

• Jangan gunakan variable PUBLIC. Variabel public sulit dilAcak dan bukan design yang baik.

• Tidak menggunakan Formsets.

• Jangan sering (overload) Form.Refresh. Terlalu banayak form.refresh bisa memperlambat aplikasi

• Gunakan awalan (prefix) untuk jenis & obyek. Misalnya cName,nPrice

• Hindari SET FILTER karena bisa memperlambat kinerja aplikasi kecuali disaat Rushmore tidak dapat digunakan.

• Jangan lupa SETs anda. Ingat SETs anda saat BeforeOpenTables event pada DataEnvironment saat form menggunakan Private DataSession. Atau bisa juga SETs pada Form.Load()

• Setiap tabel harus memiliki Primary Key

• Hindari pengulangan penulisan code (code repition) yang sama

• Gunakan default Window Close button

• Jangan menggunakan garis bawah dalam penamaan variabel dan field

• Jika memungkinkan, ikuti Panduan Standar MS Windows Design

• Komentar. Tidak hanya komentar dalam code, tapi juga dalam properti dan metode dalam Form, class designer, tables & fields dalam table designer dan modul-modul dalam project manager. Anda akan mendapatkan bahwa komentar anda sangat membantu anda.

• Gunakan SEEK PADR(field_name,field_len) jika ingin melakukan pencarian secara exact match

• Gunakan local table jika memungkinkan

Selengkapnya bisa dibaca dari sini