defaultvb.aspx.vb

Telerik是很大的第三方软件制造商

Imports System
Imports System.Web


Namespace Telerik.EditorExamplesVBNET.Editor.Examples.DBImages
   
   Public Class DefaultVB
      Inherits Telerik.QuickStart.XhtmlPage
      Protected editorMain As Telerik.WebControls.RadEditor
      
      Public Shared ReadOnly Property ConnectionString() As String
         Get
            Return "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + HttpContext.Current.Server.MapPath((HttpContext.Current.Request.ApplicationPath + "\Editor\Examples\DBImages\ImagesDB.mdb")) + ";User ID=;Password=;"
         End Get
      End Property
      
      
      Public Shared ReadOnly Property ThumbsWidth() As Integer
         Get
            Return 40
         End Get
      End Property
      
      
      Public Shared ReadOnly Property ThumbsHeight() As Integer
         Get
            Return 40
         End Get
      End Property
      Private Sub Page_Load(sender As Object, e As System.EventArgs) Handles MyBase.Load
      End Sub 'Page_Load
      Protected Overrides Sub OnInit(e As EventArgs)
         InitializeComponent()
         MyBase.OnInit(e)
      End Sub 'OnInit
      
      
      Private Sub InitializeComponent()
      End Sub 'InitializeComponent
   End Class 'DefaultVB 
End Namespace 'Telerik.EditorExamplesVBNET.Editor.Examples.DBImages