Data Classification: 1
Key Note: (0-Public; 1-Internal; 2-Confidential; 3-Strictly
Confidential)

Dear Ruthdie, 
 
Bikin function namanya of_connect_db ( string as_userid, string
as_password, string as_server) return integer kasih untuk semua
parameter dengan Pass By Value.
Ini scriptnya :
 
 SQLCA.DBMS = "MSS Microsoft SQL Server 6.x"
 SQLCA.Database = "DBName" // Ini Hard Code aja, tergantung database yg
mau dipakai di SQL2000
 SQLCA.LogPass = as_password
 SQLCA.ServerName = as_server
 SQLCA.LogId = as_userid
 SQLCA.AutoCommit = False

SQLCA.DBParm =
"PacketSize=2048,DateTimeAllowed='Yes',OptSelectBlob=1,AtAtIdentity=1,OJ
Syntax='PB',Secure=1,AppName='APP_NAME' "
// Secure = 1 adalah kalau secara database user windows adalah sekaligus
user database, sudah di beri akses di database tsb 
// Tapi kalau usernya bukan/ tidak sama dengan windows user, maka harus
script DBParm-nya adalah :
//SQLCA.DBParm =
"PacketSize=2048,DateTimeAllowed='Yes',OptSelectBlob=1,AtAtIdentity=1,OJ
Syntax='PB',UID = '" + as_userid + "'PWD='" + as_password +
"',AppName='APP_NAME' "

CONNECT USING SQLCA;
IF SQLCA.SQLCODE <> 0 THEN
     messagebox("Error Connecting", string(sqlca.sqlcode))
     RETURN -1
END IF
// If Succeed
Return 0
 
Setelah itu di dalam form, di onclick cb baru dipanggil function ini,
seperti
 
cb_ok.clicked
 
if  of_connect_db( strUID, strPasswd, strServer) <> 0  then
    //Pesan Error
else
    // Do...
end if
 
 
Regards,

 Ruby Zanuar Z.
 IT-Employee Benefit
 PT. Asuransi ALLIANZ Life Indonesia
 Summitmas II Lt. 19
 Jl. Jend. Sudirman kav 61-62
 Jakarta, 12190
 Phone  : 62-21-52998888 Ext. 2082
 Fax        : 62-21-52998880, 62-21-30003400
 E-mail : [EMAIL PROTECTED]
<mailto:[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]> > 
 


________________________________

From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf
Of Ruthdie
Sent: Wednesday, December 05, 2007 5:30 PM
To: [email protected]
Subject: Re: [indopb] gimana cara bikin connection database via koding




thank you bro atas balasanya,
tapi yg gwe maksud tuh, "katanya" ada oledb juga di pb.

nah gmn cara koneksinya kalo pake oledb?
katanya lagi nih, harus bikin file .ini atau gimana gitu lah
maklum bener2 ga tau sih.
jadi kasusnya spt ini,

gwe ada form login dgn 3 sle
1. nama server
2. nama user
3. password

misal kasusnya spt ini
- nama server : myServer
- database : myDB
- nama user : myUser
- passwordnya : myPass

gmn caranya spy bikin connectionstringnya "ala" oledbnya pb?
dgn catatan server, user, dan pass berdasarkan sele2 diatas
hehehe makanan kali sele, sorry mksdnya sle. jadi sifatnya dinamis

sekali lagi thank you.

salam
ruthdie

__________________________________________________________
Never miss a thing. Make Yahoo your home page. 
http://www.yahoo.com/r/hs <http://www.yahoo.com/r/hs> 


 
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity to whom they are addressed. If 
you have received this email in error please notify the system manager. This 
message contains confidential information and is intended only for the 
individual named. If you are not the named addressee you should not 
disseminate, distribute or copy this e-mail.

Kirim email ke