مشكلة في الإتصال بقاعدة البيانات

استخدمت هذا المود للإتصال لقاعدة بيانات sql sever

لكن يظهر لي هذا الإستثناء

Cannot open database "data" requested by the login. The login failed.
Login failed for user 'MHD\^mHd_'.

وهذا جزء من الكود

Dim cn As New SqlConnection
		cn.ConnectionString = "Server=(local)\SQLExpress;Database=data;Integrated security=true"
		cn.Open()
		Dim cmd As New SqlCommand("Select * from test", cn)
		Dim rd As SqlDataReader = cmd.ExecuteReader

الإستثناء يشير ل cn.open

مالمشكلة افيدوني