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

How would you access objects created in ActiveX Exe and ActiveX D1T ?

0 Answers  

What is the need of tabindex property is label control.

0 Answers  

what is single thread and multithread apartments model?

2 Answers   Ford,

What is the use of parameters collection?

2 Answers  

WHAT IS DIFFERENCE BETWEEN Message box and image box

13 Answers  

Difference between Linked Object and Embedded Object?

0 Answers  

What is the use of Scalewidth and ScaleHeight Proeperty?

0 Answers  

What is the default property of data control?

2 Answers  

How do I force a file dialogue box to reread the currect disk?

0 Answers  

What is the use of Visual Basic Document file?

0 Answers  

Using which type we can access file line by line?

2 Answers  

what is the property to resize a label control according to your caption?

1 Answers