Re: [Programmer-VB] Path data base

Thu, 09 Feb 2006 01:36:46 -0800

biasanya saya pake function ini...
Public Sub OpenDB(ByVal namaFileDB As String)

  If db.State = 1 Then db.Close
 
  On Error GoTo Hell
  If Right(namaFileDB, 1) <> "\" Then
    db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & namaFileDB & ";Persist Security" & _
      " Info=False"
    db.CursorLocation = adUseClient
   Else
    db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & namaFileDB & ";Persist Security" & _
      " Info=False"
    db.CursorLocation = adUseClient
  End If
  Exit Sub
Hell:
  MsgBox "File Database tidak dapat ditemukan!", vbCritical
  End
End Sub

cara memanggil procedure...
OpenDB "C:\test\database\contoh.mdb"

Note: tidak akan error meskipun file database diletakkan di root suatu drive (ie. C:\ atau D:\)

semoga bisa membantu...

br,
LiveDeviL

On 2/9/06, Purwedi Kurniawan <[EMAIL PROTECTED]> wrote:
kebalik ga ya? hehehe.. kayaknya sih bener :)
anyway, tinggal di cek apakah right(app.path,1) nya = "\" atau ga, kalau ga ada ya tinggal di tambah aja.
 
ok, mas setiawan, kesimpulannya ada beberapa cara buat nyimpan connection string ini, bisa dalam bentuk file (ascii, ini, xml) atau di registry.
u. masalah kecepatan akses saya ga pernah mbandingin, tapi biasanya saya pilih disimpan diregistry dlm bentuk encrypted ascii.
 
pd waktu aplikasi pertama kali dijalankan, dia akan membaca registry windows, dan kalau string koneksi ga ditemukan, user diminta u. memasukkan data2 yg diperlukan (servername/ip/tns name, userid, password) n program yg akan otomatis membentuk connection string yg dibutuhkan berdasarkan masukan dari user tadi, sekaligus menyimpannya di registry. (windows ini jg akan muncul kalau koneksi gagal - atau di panggil manual oleh user.)
 
logika yg sama bisa jg dipakai u. pendekatan dg file ascii/ini/xml.
 
best regards
[wwn]
# 5 minutes to 5.30 n going home :) #

 
On 2/9/06, Isak Rabin <[EMAIL PROTECTED] > wrote:
iya

app.path mesti di validasi karena kalo applikasi ada di root path,
app.path akan return "\" kalo ga di root path maka dia ga return "\" (
atau kebalik ya ??? )

cara pengen load tanpa ubah source, pake INI File atau XML File jadi,
settingan di simpen di sana

tapi ini ada kelemahan, bisa di liat oleh user, kecuali di encrypt


Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer



SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages Java programming language

YAHOO! GROUPS LINKS





--
There's no teacher who can teach us anything new...
They just help us to remember the things we always knew...

Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer



SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages Java programming language

YAHOO! GROUPS LINKS



Kirim email ke