Re: [indoprog-vb] tanya Koneksi VB ke SQL 2000

[Y INDRA PRAKASA]

Oke thanks atas informasinya sangat berguna

  ----- Original Message ----- 
  From: agus sugiarto 
  To: indoprog-vb@yahoogroups.com 
  Sent: Tuesday, March 06, 2007 5:37 PM
  Subject: Re: [indoprog-vb] tanya Koneksi VB ke SQL 2000


  Sekedar menambahkan informasi dari Bang uchenk, jangan lupa user id(user) dan 
password(bukadata) dibuatkan dulu permission acces nya pada database SQL anda


  uchenk dodit <[EMAIL PROTECTED]> wrote:
  begini dra, lu harus pancing dulu lewat adodb tar lu stringnya lu copy trs lu 
taruh deh stringnya.ini samplenya hasilnya.
  Public Sub buka_database()
  On Error GoTo slh
  cn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User 
ID=sa;Initial Catalog=sperpat;Data Source=UCHENK"
  cn.Open
  If cn.State = Not adStateOpen Then
  MsgBox "Anda Belum mengkoneksi DATA BASE", vbCritical, "Information"
  End
  End If

  err:
  Exit Sub
  slh:
  If err.Number = -2147467259 Then
  MsgBox "Data Base Belum Terkoneksi", vbCritical, "Server Tidak Di Temukan"
  End
  Else
  MsgBox err.Description, vbInformation, "Information"
  End If
  Resume err
  End Sub

  Y INDRA PRAKASA <[EMAIL PROTECTED]> wrote: mas/mbak2

  minta tolong nih, saya baru mau memindahkan database saya dari access ke 
sql2000, lha ini saya bingung menghubungkan database dengan visual basic

  SQL 2000 server sudah saya install dan saya sudah buat database disitu dengan 
nama dbtoko

  terus sql server sudah running oke dengan nama marketing/coba(marketing itu 
nama komputer saya), terus sistem log on di sqlserver adalah local system 
account

  di bawah ini adalah source code yang sudah saya buat, yang saya bingung ngisi 
data source, user, password dan initial catalognya itu benernya gimana

  Dim CN As ADODB.Connection

  Private Sub FORM_LOAD()
  Set CN = New ADODB.Connection
  CN.ConnectionString = "PROVIDER=SQLOLEDB.1; DATA SOURCE=COBA;USER ID=user; 
PWD=BUKADATA;INITIAL CATALOG=dbtoko"
  CN.Open

  End Sub

  thanks ya 

  [Non-text portions of this message have been removed]

  ---------------------------------
  Sucker-punch spam with award-winning protection.
  Try the free Yahoo! Mail Beta.

  [Non-text portions of this message have been removed]

  ---------------------------------
  Don't get soaked. Take a quick peek at the forecast 
  with theYahoo! Search weather shortcut.

  [Non-text portions of this message have been removed]



   

[Non-text portions of this message have been removed]