'[Visual Basic]
 
 
Partial Class MessengerYouLike_Web
        Inherits System.Web.UI.Page
 
 
        Protected WithEvents MessengerYouLike_Server1 As New ClsIM
 
 
 
' " Web Form Designer Generated Code "
 
 
        Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Try
 
                MessengerYouLike_Server1.ConnectionString = "server=ServerLocation;database=DBName;uid=Username;pwd=password"
                MessengerYouLike_Server1.DatabaseType = MessengerYouLike.IMSDK.IMServer.DatabaseProviders.MSSQL
                MessengerYouLike_Server1.SecertKey = "abcdef"
                MessengerYouLike_Server1.Integrated = True
 
                If Request.Form.ToString <> "" Then
                    MessengerYouLike_Server1.PassData(Request.Form.ToString())
                End If
 
 
            Catch ex As Exception
                Response.Write(ex)
            End Try
        End Sub
 
        Private Sub MessengerYouLike_Server1_OnError(ByVal data As String) Handles MessengerYouLike_Server1.OnError
            Response.Write(data)
        End Sub
 
 
        Protected Sub MessengerYouLike_Server1_OnLogOut(ByVal Username As String) Handles MessengerYouLike_Server1.OnLogOut
            Response.Write(Username)
        End Sub
 
 
 
    End Class
 
 
 
   Public Class ClsIM
        Inherits MessengerYouLike.IMSDK.IMServer
 
 
 
        Public Overrides Function NewUserRegistration(ByVal Username As String, ByVal Password As String, ByVal Email As String, ByVal Firstname As String, ByVal Lastname As String) As Boolean
           'Your Implemention details
        End Function
 
 
        Public Overrides Function VerifyLogin(ByVal Username As String, ByVal password As String) As Integer
         'Your Implemention details
        End Function
 
    End Class