خطأ في ربط صفحة انترنت و Sql Server2008

An error has occurred while establishing a connection to the server. When connecting to SQL Server 2005, this failure may be caused by the fact that under the default settings SQL Server does not allow remote connections. (provider: SQL Network Interfaces, error: 26 - Error Locating Server/Instance Specified)

Imports System

Imports System.Data

Imports System.Data.SqlClient

Partial Class Web_Default3

Inherits System.Web.UI.Page

Dim con As SqlConnection

Dim da As SqlDataAdapter

Dim ds As DataSet

Public ConServer As SqlClient.SqlConnection

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

ConServer = New SqlClient.SqlConnection("Data Source=.\FTGROUP;AttachDbFilename=|DataDirectory|\FTDataBase.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True")

Dim SqlString As String = ""

ds = New DataSet()

SqlString = "select MnthNum,MnthNameAr,MnthNameEn,MnthShortCut from TblMonth ;"

da = New SqlDataAdapter(SqlString, ConServer)

da.Fill(ds, "TblMonth")

GridView4.DataSource = ds.Tables("TblMonth")

GridView4.DataBind()

ds.Dispose()

da.Dispose()

End Sub

End Class