نصب MYSQL در شبکه و اتصال کلاینتها از طریق VB

[OCTAGON]

دوستان , برنامه ای تحت شبکه با دیتابیس mysql نوشته ام که مسلما باید کاربرها به دیتابیس وصل شوند و از دیتابیس استفاده کنند.
1- آیا نصب mysql روی سرور با کلاینت تفاوت دارد ؟
2- صرف نصب mysql روی سرور ارتباط کلاینت ها برقرار می شود ؟

[OCTAGON]

دوستان و اساتید کسی نبود که یک پاسخ کوچولو هم بده !!!!

[noorsoft]

1- نصب MySql روی سرور و کلاینت هیچ فرقی نداره
2- نه چون شما باید در کلاینتها نام سرور - نام دیتابیس و رمز عبور را وارد کنید
شما وقتی روی کلاینت MySql نصب میکنید یوزر شما root و پسورد هم ندارین و مسیر سرور هم 127.0.0.1 میشه حالا که قراره کلاینت از سرور استفاده کنه باید این پارامترها را تغییر بدی

موفق باشید

[OCTAGON]

اول - از مدیر محترم بخش بخاطر پاسخ متشکرم
دوم - می فرمائید که بین نصب mysql روی سرور و کلاینت فرقی ندارد خوب این درست اما نحوه ارتباط را نفرمودید . منظور من این است که یک برنامه vb با mysql وقتی از روی localhost اجرا می شود و در حقیقت از روی سرور اجرا می شود که حسابش معلوم است ولی زمانی که بر روی سرور نصب و از کلاینت می خواهیم به mysql متصل شویم یوزر و مسیر سرور را چطوری مشخص کنیم.

متشکر
امیر

[noorsoft]

سرور شما یک آدرس آی پی یا نام دارد مثلا 67.135.45.114 یا www.server.com (http://www.server.com) این میشه نام سرور
بعد باید روی سرور در کنترل پانل یک دیتابیس بسازید و یک یوزر پسورد هم بسازید و برای اتصال با وی بی مشخصات آنها را هم وارد می کنید یک مثال پایین میزارم نگاه کنید





Private Sub Command1_Click()

Dim strServerName As String
Dim strDatabaseName As String
Dim strUserName As String
Dim strPassword As String

strServerName = "www.refah110.com"
strDatabaseName = "myshop"
strUserName = "refah110"
strPassword = "1234567"

CnnString = "DRIVER={MySQL ODBC 3.51 Driver};" & _
"SERVER=" & strServerName & _
";DATABASE=" & strDatabaseName & ";" & _
"USER=" & strUserName & _
";PASSWORD=" & strPassword & _
";OPTION=1 + 2 + 8 + 32 + 2048 + 163841;"

'as string and:
Dim strSql As String
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset

On Error GoTo Command1_Click_Error


cn.Open CnnString
strSql = "select * from address_book"
rs.Open strSql, cn, adOpenDynamic, adLockBatchOptimistic

Set DataGrid1.DataSource = rs

Exit Sub

Command1_Click_Error:
MsgBox "Error " & Err.Number & " (" & Err.Description & ")"
End Sub

[NSNhaCkEr]

سرور شما یک آدرس آی پی یا نام دارد مثلا 67.135.45.114 یا www.server.com (http://www.server.com) این میشه نام سرور
بعد باید روی سرور در کنترل پانل یک دیتابیس بسازید و یک یوزر پسورد هم بسازید و برای اتصال با وی بی مشخصات آنها را هم وارد می کنید یک مثال پایین میزارم نگاه کنید





Private Sub Command1_Click()

Dim strServerName As String
Dim strDatabaseName As String
Dim strUserName As String
Dim strPassword As String

strServerName = "www.refah110.com"
strDatabaseName = "myshop"
strUserName = "refah110"
strPassword = "1234567"

CnnString = "DRIVER={MySQL ODBC 3.51 Driver};" & _
"SERVER=" & strServerName & _
";DATABASE=" & strDatabaseName & ";" & _
"USER=" & strUserName & _
";PASSWORD=" & strPassword & _
";OPTION=1 + 2 + 8 + 32 + 2048 + 163841;"

'as string and:
Dim strSql As String
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset

On Error GoTo Command1_Click_Error


cn.Open CnnString
strSql = "select * from address_book"
rs.Open strSql, cn, adOpenDynamic, adLockBatchOptimistic

Set DataGrid1.DataSource = rs

Exit Sub

Command1_Click_Error:
MsgBox "Error " & Err.Number & " (" & Err.Description & ")"
End Sub


ببخشید تاپیک قدیمی اوردم بالا ولی یک سوال
م اصلا داریوری به نام {MySQL ODBC 3.51 Driver} نداریم ...؟
حالا چی کار کنیم
مثلا dll وجود نداره برای اتصال به بانک اطلاعاتی mysql

[kahroba77]

سلام
آقا اگه بخوایم از client به سرور وصل بشیم تنظیمات Security ، login ، user و سطح دسترسی ها چجوری باید تنظیم بشه ؟