Thread: Cannot find server error

OK, I just cannot see what the problem is with this code. If I run it, it causes a "Cannot find server" error. It's absolutely doing my head in.

.aspx.vb
[highlight=asp]
Sub build_marital_status()
ddl_marital1.DataSource = SiteBLL.GetMaritalStatusList()
ddl_marital1.DataValueField = "ref"
ddl_marital1.DataTextField = "type"
ddl_marital1.DataBind()
End Sub
[/highlight]

BOL
[highlight=asp]
Public Class MaritalList
Inherits List(Of MaritalType)
Public Sub New()
End Sub

Private _page_error As String = String.Empty
Public Property page_error() As String
Get
Return _page_error
End Get
Set(ByVal value As String)
_page_error = value
End Set
End Property
End Class

Public Class MaritalType
Public Sub New(ByVal p_ref As String, ByVal p_type As String)
ref = p_ref
type = p_type
End Sub

Private _ref As String = String.Empty
Public Property ref() As String
Get
Return _ref
End Get
Set(ByVal value As String)
_ref = value
End Set
End Property

Private _type As String = String.Empty
Public Property type() As String
Get
Return _type
End Get
Set(ByVal value As String)
_type = value
End Set
End Property
End Class
[/highlight]

BLL Code
[highlight=asp]
Public Shared Function GetMaritalStatusList() As MaritalList

Return GetMaritalStatusList()

End Function
[/highlight]

DAL Code
[highlight=asp]
Public Shared Function GetMaritalStatusList() As MaritalList
Dim MaritalList As New MaritalList
Dim conn As New MySqlConnection(ConnDAL.connString)
Dim mycommand As New MySqlCommand("SELECT statusref,marital_status FROM marital_status", conn)
Dim rsgr As MySqlDataReader
Using conn
Using mycommand
Try
conn.Open()
rsgr = mycommand.ExecuteReader
If rsgr.HasRows Then
Do While rsgr.Read
MaritalList.Add(New MaritalType(rsgr("statusref"), rsgr("marital_status")))
Loop
End If
rsgr.Close()
Catch ex As Exception
MaritalList.page_error = ex.ToString
Finally
mycommand.Dispose()
conn.Close()
conn.Dispose()
End Try
End Using
End Using

Return MaritalList

End Function
[/highlight]

I have run the query directly in the db and it works fine. I use exactly the same code on another ddl that I populate from the db and that works fine.

I just cannot see why this causes this error.

Any ideas?

Your posted code is hard to read..so it's hard to tell...however, I'm sure the real error is being hidden. If using IE, do you have script debugging enabled in the Internet Options? If not, you won't see the real error message. It could be a server 500 error. Make sure everything is all right with your database connection and such.

OK. Found the problem
This
[highlight=asp]
Public Shared Function GetMaritalStatusList() As MaritalList
Return GetMaritalStatusList()
End Function
[/highlight]
Should have been
[highlight=asp]
Public Shared Function GetMaritalStatusList() As MaritalList
Return SiteDAL.GetMaritalStatusList()
End Function
[/highlight]
I knew it must have been something easy.

Thank the lord for that....