Re: [Programmer-VB] Membuat Database melalui SQL

Thu, 24 Aug 2006 00:28:09 -0700

source di bawah ini diletakkan di module.bas
Option Explicit
Public conDB As ADODB.Connection
Public mSQL, mLoginName, mPassword, mLevel
 
Sub subOpenConnection()
    Set conDB = New ADODB.Connection
    conDB.Open _
        "Provider=SQLOLEDB.1;" & _
        "Persist Security Info=False;" & _
        "User ID=sa;" & _
        "Initial Catalog=zes;" & _
        "Data Source=(local)"
End Sub
 
buat form kosong, tambahkan commandbutton, isikan source dibawah ini
Private Sub Command1_Click()
    mSQL = _
        " CREATE DATABASE Products ON " & _
        " ( " & _
        " NAME = prods_dat, " & _
        " FILENAME = 'c:\mssql7\data\prods.mdf', " & _
        " SIZE = 4, " & _
        " MAXSIZE = 10, " & _
        " FILEGROWTH = 1 ) "
    conDB.Execute mSQL, , 1
End Sub
 
mudah2an membantu
thanks
 
----- Original Message -----
From: agus nur
Sent: Wednesday, August 23, 2006 11:15 AM
Subject: [Programmer-VB] Membuat Database melalui SQL

Hallo semuanya, saya punya kesulitan nih, gimana koding membuat database melalui SQL di Visual Basic 6.0, mudah-mudahan rekan2 semua bisa bantu

__._,_.___

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
Indonesia phone card Programmer Indonesia tour
Indonesia travel Indonesia flower

YAHOO! GROUPS LINKS



__,_._,___

Kirim email ke