Plattform: ASP.NET sp3
Språk: VB

När jag anropar en funktion i en class som ser ut såhär:

<code>
Public Function Login(ByVal strUserName As String, ByVal strPassword As String) As Integer

Dim intUserID As Integer = 0

Dim objCmd As New OleDbCommand()
Dim objParam As New OleDbParameter()
Dim strErrorMessage As String

'--- anropar en stored procedure
objCmd = New OleDbCommand("spValidateUser", objConn)
objCmd.CommandType = CommandType.StoredProcedure

'--- parametervärde
objParam = New OleDbParameter("@UserName", OleDbType.Char)
objParam.Value = strUserName
objCmd.Parameters.Add(objParam)

'--- parametervärde
objParam = New OleDbParameter("@Password", OleDbType.Char)
objParam.Value = strPassword
objCmd.Parameters.Add(objParam)

'--- kontroll
Try
objCmd.Connection.Open()
intUserID = CType(objCmd.ExecuteScalar, Integer)
Catch Ex As Exception
strErrorMessage = Ex.Message.ToString
Finally
objCmd.Connection.Close()
End Try

If intUserID.ToString = "" Then
intUserID = 0
End If

If Not (strErrorMessage Is Nothing) Then
'--- här vill jag returnera felmeddelandet ---???????????????????
Else
Return intUserID
End IF

End Function
</code>

Jag kan ju inte returnera en sträng som Integer, så HUR GÖRA?

varför inte kasta en exception?

Jag vill returnera felet för att sedan visa detta på en separat sida, typ så som Pelle har här (om du har sett ett fel här någon gång :-)).

Då passar det väl bra med en exception? Om du sedan fångar den så kan du ju visa din sida...

Hur menar du, kan du förklara lite närmare?

antagligen så får du väl göra så att allting på sidan är osynligt (hur=vet ej) och sedan skriva ut det som kastades

Mitt scenario:

Jag har en sub i CodeBehind som anropar funktionen ovan som ligger i en kompilerad klass.

Hur fångar jag upp en Exception från denna klass-funktion?

tror att du vid anropet fångar den, fråga någon som vet i chatten eller något... :)

Hittade lösningen, tror jag för att fånga Exception i CodeBehind:

<code>
Protected Overrides Sub OnError(ByVal EA As EventArgs)

Dim strErrorPage As String = Request.ServerVariables("SCRIPT_NAME").ToString
Dim strErrorMessage As String = Server.GetLastError.Message.ToString
Response.Redirect("ErrorPage.aspx?ErrorPage=" & strErrorPage & "&ErrorMessage=" & strErrorMessage)

End Sub
</code>