You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
16 lines
644 B
16 lines
644 B
<%@ Page Language="VB" Debug="true"%>
|
|
<%@ Import Namespace="System.IO" %>
|
|
<%@ Import Namespace="System.Drawing.Imaging" %>
|
|
<%@ Import Namespace="obout_ASPTreeView_2_NET" %>
|
|
|
|
<script language="VB" runat="server">
|
|
Public Sub Page_Load(sender As Object, e As EventArgs)
|
|
Dim imageFolder As String = "images"
|
|
|
|
Dim maxWidth As Integer = 100
|
|
Dim maxHeight As Integer = 100
|
|
Dim separator As Char() = New [Char]() {"/"c}
|
|
|
|
Dim protocol As String = Page.Request.ServerVariables("SERVER_PROTOCOL").Split(separator)(0).ToLower()
|
|
Dim port As String = ":" & Page.Request.ServerVariables("SERVER_PORT")
|