Connection String 1

[R9772]

can anyone help me with a connection to a SQL Server database?

 

[vassoft]

Refer MSDN
In msdn direct code is there.
Just u copy that and paste ur application change the server name

 

[SemperFiDownUnda]

drop a ADO Data control on your form, use the connection string property to build the connection string, then cut and copy the string and remove the control.

 

[sunaj]

Or paste the following into a file with .vbs as extension. Double click the file and the datalink dialog will pop up.
The code was originally posted in an other forum - but I couldn't find it agian. I did not write this code.

********************************************************
Dim oDataLinks, sRetVal
set oDataLinks = CreateObject("DataLinks&quot
On Error Resume Next
sRetVal = oDataLinks.PromptNew
On Error Goto 0
If Not IsEmpty(sRetVal) Then
InputBox "Your Connection String Is Listed Below", "OLEDB Connection String", sRetVal
End If
Set oDataLinks = Nothing
********************************************************
Sunaj
'The gap between theory and practice is not as wide in theory as it is in practice'

 

[ManojX]

Try this out,

Step 1.
Dim strCon as string
Dim con as new ADODB.Connection

Step 2.
if you are using a DSN(Data source name) to connect to the SQL server, Then use this method

Syntax:
strCon="DSN=DSN_Name;UID=userID;PWD=password;Database=databasename"

Or you can use this method which is much easier,
Syntax:
strCon="DRIVER={SQL SERVER};SERVER=SERVER_Name;UID=userID;PWD=password;Database=databa"