Answer / deepak g

You have to use this DSN name (in your case it is sonia) in
your VB code wherever you wish to establish a connection
between your VB application and your SQL server 2K database.

Answer / ramu.m

You have to create the DSN programatically by using some
code.

Answer / vikram

You can used DSN Less Code here (which is more usefull
andimportant insteated of using DSN Coz when you run that
Application on Different PC, then you have to crete DSN
again..)
DSN Less Code for Connection MS ACCESS: or can connect any
db just need to change its provider:
dim con as new adodb.Connection
con.open "provider=microsoft.jet.oledb.4.0;" & "Data
Source= ur db path (there is no space btn Folder and File
Name)"

Answer / vikas gupta`

you can try this for the perticular user in sql

'Set con = New Connection
'con.ConnectionString = "Provider=SQLOLEDB.1;Integrated
Security=SSPI;Persist Security Info=False;Initial
Catalog=account;Data Source=."
'con.Open
'Set rec = New Recordset
'rec.Open "select * from acc_details", con, adOpenDynamic,
adLockOptimistic

Answer / abdul khadeer

After creating the DSN. You can use that DSN to access the
DATA.
For Example U Can Use the ADODB connection Object to
connect the Database by using ur DSN created.

For Example Say "Con" is object ADODB.Connection
Then open ur coonection.
Con.Open "MyDSN","UserName","Password"

Now the conection created, Now u can use this connection
object with ur record set oject to retirve the data

Answer / sri

You also can create the DSN Programatically as follows
Creating DSN Programatically

Private Sub ConfigDSN()
On Error Resume Next
#If Win32 Then
Dim intRet As Long
#Else
Dim intRet As Integer
#End If
Dim strDriver As String
Dim strAttributes As String
Dim msmdbpath As String


' sdPathName = App.path & "\PROJECT.mdb"
strDriver = "Microsoft Access Driver (*.mdb)"
strAttributes = "SERVER=" & Chr$(0)
strAttributes = strAttributes & "DESCRIPTION=OJAL Data
Souce Name" & Chr$(0)
strAttributes = strAttributes & "DSN=INT" & Chr$(0)
strAttributes = strAttributes & "DATABASE=" &
sdPathName & Chr$(0)
strAttributes = strAttributes & "MaxBufferSize=512" &
Chr$(0)
strAttributes = strAttributes & "PageTimeOut=5" & Chr$(0)
strAttributes = strAttributes & "DBQ=" & sdPathName &
Chr$(0)
intRet = SQLConfigDataSource(vbAPINull,
ODBC_CONFIG_DSN, strDriver, strAttributes)
End Sub

what you know about databases?

2 Answers   Satyam,

What is the difference between message box

11 Answers  

How do I get a bitmap picture in a field in an Access database?

0 Answers  

what is different from edit and updates?

15 Answers   SoftTech, Wipro,

List out controls which does not have events ?

1 Answers  

what are the Advantages of disconnected recordsets

1 Answers  

What is frx?

3 Answers   Cap Gemini,

Explain what is Visual basic?

0 Answers  

How would you add elements and pictures to listitems in listview control?

0 Answers  

What is the default workspace?

0 Answers  

Types of cursors in DAO?

0 Answers  

How many images can be placed in the image list ?

2 Answers