اتصال به پایگاه داده sql serverدرمحیط vb6

[computer engineer1]

سلام از دوستان میخوام لطف کنن بگن این قسمت را باید چطور تغییر بدم تا پایگاه داده منو بخونه
من برای sqlserver
پسورد دارم چون با زبانvbآشنا نیستم ممنون میشم بگید چه تغییراتی باید تو این قسمت بدم

Option Explicit
Public DBCon As New ADODB.Connection
()Public Sub Open_DB
Dim s As String
s = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial
."=Catalog=PROJECT_MANAGMENT;Data Source
DBCon.Open s
End Sub

Public Sub Close_DB()
DBCon.Close
End Sub

[m.4.r.m]

Dim s As String
s = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=PROJECT_MANAGMENT;Data Source;Password="کلمه عبور شما"; "


اینو تست کن

[computer engineer1]

";"s = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=PROJECT_MANAGMENT;Data Source;Password= "123
من دقیقا این قسمت را نوشتم اما خطای نحوی میده
پسورد برایsql serverمن هم 123 هست وقتی میخوام وارد شم

[computer engineer1]

هر کدام از فیلدهای بالا را میشه برام توضیح بدید که چه مقداری را باید تو اونها قرار بدم
ممنون میشم اگه کسی در مورد فیلدهای موجود در این خط دستور توضیح بده که هرکدوم برا مشخص کردن چی هستن دقیقا
شایید اینجوری بفهمم مشکل از کجاست

[m.4.r.m]

اینم کد صحیح پسورد دار با این دیگه مشکلت حل میشه :
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Server=JOKER-PC;Password='1607688';Persist Security Info=True;User ID=sa;Initial Catalog=DB;"
Adodc1.RecordSource = "Select * From B"
Adodc1.Refresh


حالا توضیحات اینها :
Provider=SQLOLEDB.1 : یعنی اتصال داده بشه از طریق SQLServer
Server=JOKER-PC : نام سرور که در نصب SQL تعریف کرده اید که معمولا نام کامپیوتر به صورت دیفالت میشه حالا شاید یکی نام دلخواه هم داده بشه که شما هم در کد بالا اینو عوض می کنی به نام سرور خودت بخوای حالات پویایی داشته باشه که هر دفعه در همه سیستم ها عوض نکنی میای یک متغییر قرار میدی به جای Joker-pc و قبل از اتصال هم متغییر نام SQL قرار میدی یا از تکست باکس می خونی حالا هر جور دلت بخواد

Password='1607688' : پسورد مربوط به نام کاربری Sa در SQL می باشد. که شما هم باید 123 قرار بدی
Persist Security Info=True : یعنی بانک شما دارای پسورد است .
User ID=sa : اگه SQL دارای پسورد باشه باید این مورد که مشخص کننده نام sa هست نوشته بشه ( حتما و حتما )
Initial Catalog=DB : نام دیتابیس شما .