[VB2005PRO]Database

Zanima me kako se naredi povezavo v nek database brer config fila

Sepravi ne gre za connection string ampak nakj malo bolj drugace.
Imel sem v mislih da bi mel ubistvu ta zapis povezave v neki dll datoteki do katre bi potem dostopala exe datoteka

Hvalezen bom z vsak odgovor

Linki so sicer zazeljeni ampak prosim da cimvec poveste tako da pastae kodo in jo malo razlozite

zapisan naj bi bil kar v sorcu oziroma bol natancno v nekem dllju za zadej samo v direktenm sorcu in ne v configu kakor je bil do zdaj

saj u tem je problem ne vem katero vrednost nastaviti in kako

ne vem kaksen string nastavit

'** Properties
Private _connectionReady As Boolean = False
Private _databasePassword As String = ""
Private _databasePath As String
Private _databaseTableName As String
Private _dataTable As New DataTable
Private _sqlString As String
Private _sqlDistinct As Boolean
Private _sqlSelectList As String
Private _sqlWhere As String
Private _sqlOrderBy As String
Private _sqlAscending As Boolean

'** Database connection constants and variable
Private Const mtDB_PROVIDER As String = "Provider=Microsoft.Jet.OLEDB.4.0"
Private Const mtDB_DATA_SOURCE As String = "Data Source="
Private Const mtDB_PASSWORD As String = "Jet OLEDB:Database Password="
Private dbConnectionString As String

'** SQL SELECT constants
Private Const mtSELECT_VERB As String = "SELECT "
Private Const mtSELECT_DISTINCT As String = "DISTINCT "
Private Const mtSELECT_ASTERISK As String = "*"
Private Const mtSELECT_FROM As String = " FROM "
Private Const mtSELECT_ORDER_BY As String = " ORDER BY "
Private Const mtSELECT_ASCENDING As String = " ASC"
Private Const mtSELECT_DESCENDING As String = " DESC"

'** SQL INSERT constants
Private Const mtINSERT_VERB As String = "INSERT INTO "
Private Const mtINSERT_VALUES As String = " VALUES ("

'** SQL UPDATE constants
Private Const mtUPDATE_VERB As String = "UPDATE "
Private Const mtUPDATE_SET As String = " SET "

'** SQL DELETE constants
Private Const mtDELETE_VERB As String = "DELETE FROM "

'** General purpose constants
Private Const mtCOMMA As String = ", "
Private Const mtEQUAL_SIGN As String = " = "
Private Const mtLEFT_BRACKET As String = "["
Private Const mtLEFT_PAREN As String = " ("
Private Const mtPOUND_SIGN As String = "#"
Private Const mtRIGHT_BRACKET As String = "]"
Private Const mtRIGHT_PAREN As String = ")"
Private Const mtSEMI_COLON As String = ";"
Private Const mtSINGLE_QUOTE As String = "'"
Private Const mtSPACE As String = " "
Private Const mtWHERE As String = " WHERE "





Tole kodo sem nekje nasel povejt mi kako to uporabim in pac malo razlozite kaj od tega ubistvu ne potrebujem