中国开发网: 论坛: 程序员情感CBD: 贴子 165741
UnKnow365
没脾气,图片没法编辑
Server Error in '/' Application.
--------------------------------------------------------------------------------

Compilation Error
Description: An error occurred during the compilation of a resource required to service this request. Please review the following specific error details and modify your source code appropriately.

Compiler Error Message: BC30456: 'FileSystem' is not a member of 'IO'.

Source Error:



Line 70:
Line 71: Dim filepath
Line 72: filepath = System.IO.FileSystem.GetParentPath(filename)
Line 73: System.IO.FileSystem.CreateDirectory(filepath)
Line 74:


Source File: d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx Line: 72



Show Detailed Compiler Output:


C:\WINNT\system32> "C:\WINNT\Microsoft.NET\Framework\v2.0.50215\vbc.exe" /t:library /utf8output /R:"C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\assembly\dl3\0a9724c2\85220b07_8480c501\Mystery.Web.DLL" /R:"C:\WINNT\assembly\GAC_MSIL\System.Xml\2.0.0.0__b77a5c561934e089\System.Xml.dll" /R:"C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\App_global.asax.whm6wghz.DLL" /R:"C:\WINNT\assembly\GAC_MSIL\System.Web.Services\2.0.0.0__b03f5f7f11d50a3a\System.Web.Services.dll" /R:"C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\assembly\dl3\07a6c6c6\e406a9ae_428bc501\Nox.Common.DLL" /R:"C:\WINNT\assembly\GAC_MSIL\System\2.0.0.0__b77a5c561934e089\System.dll" /R:"C:\WINNT\assembly\GAC_32\System.Data\2.0.0.0__b77a5c561934e089\System.Data.dll" /R:"C:\WINNT\assembly\GAC_32\System.EnterpriseServices\2.0.0.0__b03f5f7f11d50a3a\System.EnterpriseServices.dll" /R:"C:\WINNT\assembly\GAC_MSIL\System.Drawing\2.0.0.0__b03f5f7f11d50a3a\System.Drawing.dll" /R:"C:\WINNT\assembly\GAC_32\System.Web\2.0.0.0__b03f5f7f11d50a3a\System.Web.dll" /R:"C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\assembly\dl3\c1825c29\8012c258_3b8cc501\NoxForum.Framework.DLL" /R:"C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\assembly\dl3\8f6693a8\c976d990_4975c501\ADODB.DLL" /R:"C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\App_Code.ibmlnba_.DLL" /R:"C:\WINNT\assembly\GAC_MSIL\System.Web.Mobile\2.0.0.0__b03f5f7f11d50a3a\System.Web.Mobile.dll" /R:"C:\WINNT\assembly\GAC_MSIL\System.Configuration\2.0.0.0__b03f5f7f11d50a3a\System.Configuration.dll" /out:"C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\App_Web_my8ff5xw.dll" /D:DEBUG=1 /debug+ /win32resource:"C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\my8ff5xw.res" /define:_MYTYPE=\"Web\" /imports:Microsoft.VisualBasic,System,System.Collections,System.Collections.Specialized,System.Configuration,System.Text,System.Text.RegularExpressions,System.Web,System.Web.Caching,System.Web.SessionState,System.Web.Security,System.Web.Profile,System.Web.UI,System.Web.UI.WebControls,System.Web.UI.WebControls.WebParts,System.Web.UI.HtmlControls "C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\my8ff5xw.0.vb" "C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\my8ff5xw.1.vb" "C:\WINNT\Microsoft.NET\Framework\v2.0.50215\Temporary ASP.NET Files\root\4317d162\6048f1d0\my8ff5xw.2.vb"


Microsoft (R) Visual Basic Compiler version 8.0.50215.44
for Microsoft (R) .NET Framework version 2.0.50215.44
Copyright (C) Microsoft Corporation 1987-2003. All rights reserved.

d:\zhaix\websites\cndev.org#www\ox_pics\owner_op_rebuild.aspx(15) : warning BC42020: Variable declaration without an 'As' clause; type of Object assumed.

Dim rsPics
~~~~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_op_rebuild.aspx(27) : error BC30456: 'FileSystem' is not a member of 'IO'.

fileinfo = System.IO.FileSystem.GetFileInfo(filename)
~~~~~~~~~~~~~~~~~~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_op_rebuild.aspx(31) : error BC30002: Type 'Noxaso.Jpeg' is not defined.

Dim objImage As Noxaso.Jpeg
~~~~~~~~~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx(6) : warning BC42020: Variable declaration without an 'As' clause; type of Object assumed.

Dim rsPics
~~~~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx(8) : warning BC42020: Variable declaration without an 'As' clause; type of Object assumed.

Dim strBarrefx
~~~~~~~~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx(15) : warning BC42020: Variable declaration without an 'As' clause; type of Object assumed.

Dim sql
~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx(71) : warning BC42020: Variable declaration without an 'As' clause; type of Object assumed.

Dim filepath
~~~~~~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx(72) : error BC30456: 'FileSystem' is not a member of 'IO'.

filepath = System.IO.FileSystem.GetParentPath(filename)
~~~~~~~~~~~~~~~~~~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx(73) : error BC30456: 'FileSystem' is not a member of 'IO'.

System.IO.FileSystem.CreateDirectory(filepath)
~~~~~~~~~~~~~~~~~~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx(93) : warning BC42020: Variable declaration without an 'As' clause; type of Object assumed.

Dim filepath
~~~~~~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx(94) : error BC30456: 'FileSystem' is not a member of 'IO'.

filepath = System.IO.FileSystem.GetParentPath(filename)
~~~~~~~~~~~~~~~~~~~~
d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx(95) : error BC30456: 'FileSystem' is not a member of 'IO'.

System.IO.FileSystem.CreateDirectory(filepath)
~~~~~~~~~~~~~~~~~~~~





Show Complete Compilation Source:


Line 1: #ExternalChecksum("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx","{406ea660-64cf-4c82-b6f0-42d48172a799}","D7B58B9BCF7A289884BD873F6F3D33DD")
Line 2: '------------------------------------------------------------------------------
Line 3: ' <auto-generated>
Line 4: ' This code was generated by a tool.
Line 5: ' Runtime Version:2.0.50215.44
Line 6: '
Line 7: ' Changes to this file may cause incorrect behavior and will be lost if
Line 8: ' the code is regenerated.
Line 9: ' </auto-generated>
Line 10: '------------------------------------------------------------------------------
Line 11:
Line 12: Option Strict Off
Line 13: Option Explicit On
Line 14:
Line 15: Imports Microsoft.VisualBasic
Line 16: Imports NoxForum.Framework
Line 17: Imports System
Line 18: Imports System.Collections
Line 19: Imports System.Collections.Specialized
Line 20: Imports System.Configuration
Line 21: Imports System.Text
Line 22: Imports System.Text.RegularExpressions
Line 23: Imports System.Web
Line 24: Imports System.Web.Caching
Line 25: Imports System.Web.Profile
Line 26: Imports System.Web.Security
Line 27: Imports System.Web.SessionState
Line 28: Imports System.Web.UI
Line 29: Imports System.Web.UI.HtmlControls
Line 30: Imports System.Web.UI.WebControls
Line 31: Imports System.Web.UI.WebControls.WebParts
Line 32:
Line 33: Namespace ASP
Line 34:
Line 35: <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()> _
Line 36: Public Class owner_pic_modi_aspx
Line 37: Inherits Global.System.Web.UI.Page
Line 38: Implements System.Web.SessionState.IRequiresSessionState
Line 39:
Line 40:
Line 41: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",202)
Line 42: Protected WithEvents abcActionTitle As Global.System.Web.UI.WebControls.Label
Line 43:
Line 44: #End ExternalSource
Line 45:
Line 46:
Line 47: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",213)
Line 48: Protected WithEvents imgPictureView As Global.System.Web.UI.WebControls.Image
Line 49:
Line 50: #End ExternalSource
Line 51:
Line 52:
Line 53: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",275)
Line 54: Protected WithEvents abcPictureUrl As Global.System.Web.UI.WebControls.Label
Line 55:
Line 56: #End ExternalSource
Line 57:
Line 58:
Line 59: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",204)
Line 60: Protected WithEvents placeInfoView As Global.System.Web.UI.WebControls.PlaceHolder
Line 61:
Line 62: #End ExternalSource
Line 63:
Line 64:
Line 65: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",295)
Line 66: Protected WithEvents inputFileImage As Global.System.Web.UI.WebControls.FileUpload
Line 67:
Line 68: #End ExternalSource
Line 69:
Line 70:
Line 71: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",314)
Line 72: Protected WithEvents txtPictureTitle As Global.System.Web.UI.WebControls.TextBox
Line 73:
Line 74: #End ExternalSource
Line 75:
Line 76:
Line 77: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",331)
Line 78: Protected WithEvents txtPictureIntro As Global.System.Web.UI.WebControls.TextBox
Line 79:
Line 80: #End ExternalSource
Line 81:
Line 82:
Line 83: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",287)
Line 84: Protected WithEvents placeFormEdit As Global.System.Web.UI.WebControls.PlaceHolder
Line 85:
Line 86: #End ExternalSource
Line 87:
Line 88:
Line 89: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",341)
Line 90: Protected WithEvents placeFormDelete As Global.System.Web.UI.WebControls.PlaceHolder
Line 91:
Line 92: #End ExternalSource
Line 93:
Line 94: Private Shared __initialized As Boolean
Line 95:
Line 96: Private Shared __stringResource As Object
Line 97:
Line 98: Private Shared __fileDependencies As Object
Line 99:
Line 100:
Line 101: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",3)
Line 102:
Line 103:
Line 104: Dim qsAction As String
Line 105: Dim rsPics
Line 106: Dim strPID As String
Line 107: Dim strBarrefx
Line 108: Dim qsPicID As String
Line 109:
Line 110: Sub Page_Load()
Line 111:
Line 112: SecureSystem.CheckIsLogin()
Line 113:
Line 114: Dim sql
Line 115:
Line 116: qsAction = Request.QueryString("action")
Line 117: qsPicID = ""
Line 118: If qsAction = "add" Then
Line 119:
Line 120: sql = "SELECT TOP 1 * FROM ox_pics "
Line 121: rsPics = Server.CreateObject("ADODB.Recordset")
Line 122: rsPics.open(sql, NoxForum.Web.Global.yaconn(), 1, 3)
Line 123: rsPics.Addnew() 'need it blank, DONT .update
Line 124:
Line 125: ElseIf qsAction = "edit" Or qsAction = "delete" Then
Line 126:
Line 127: qsPicID = Nox.Common.Encoder.GuidString(Request.QueryString("id"))
Line 128: sql = "SELECT TOP 1 * FROM ox_pics WHERE 1 = 1 "
Line 129: sql = sql & " AND account_id = '" & Nox.Common.Encoder.SqlString(NoxForum.Framework.SecureSystem.CurrentUser.UserID) & "' "
Line 130: sql = sql & " AND pic_id = '" & Nox.Common.Encoder.SqlString(qsPicID) & "' "
Line 131: rsPics = Server.CreateObject("ADODB.Recordset")
Line 132: rsPics.open(sql, NoxForum.Web.Global.yaconn(), 1, 3)
Line 133:
Line 134: If rsPics.eof Then
Line 135: Throw ExceptionSystem.MakeException("没有这个图片或者您不能对这个图片进行操作")
Line 136: End If
Line 137:
Line 138: Else
Line 139: Throw NoxForum.Framework.ExceptionSystem.MakeException("参数错误")
Line 140: End If
Line 141:
Line 142: If Page.IsPostBack Then
Line 143:
Line 144: If qsAction = "add" Or qsAction = "edit" Then
Line 145:
Line 146: rsPics("pic_title").Value = txtPictureTitle.Text
Line 147: rsPics("pic_intro").Value = txtPictureIntro.Text
Line 148:
Line 149: End If
Line 150:
Line 151: If qsAction = "add" Then
Line 152:
Line 153: rsPics("account_id") = NoxForum.Framework.SecureSystem.CurrentUser.UserID.ToString("B")
Line 154:
Line 155: If inputFileImage.FileContent.Length = 0 Then
Line 156: Throw NoxForum.Framework.ExceptionSystem.MakeException("没有选择文件")
Line 157: End If
Line 158:
Line 159: If Not inputFileImage.FileName.ToLower.EndsWith(".jpg") Then
Line 160: Throw NoxForum.Framework.ExceptionSystem.MakeException("只允许.jpg图片")
Line 161: End If
Line 162:
Line 163: rsPics("isTransFinal").Value = 0
Line 164:
Line 165: rsPics.Update()
Line 166:
Line 167: Dim filename As String
Line 168: filename = Server.MapPath(NoxForum.Framework.GallerySystem.GetPictureUrl(CInt(rsPics("pic_idnum").Value), New Guid(rsPics("pic_id").Value.ToString()), "ori"))
Line 169:
Line 170: Dim filepath
Line 171: filepath = System.IO.FileSystem.GetParentPath(filename)
Line 172: System.IO.FileSystem.CreateDirectory(filepath)
Line 173:
Line 174: inputFileImage.SaveAs(filename)
Line 175:
Line 176: Response.Redirect(Nox.Common.Helper.AbsolutePath("~/ox_pics/owner_op_rebuild.aspx?id={0}", rsPics("pic_id").Value))
Line 177: Response.End()
Line 178:
Line 179:
Line 180:
Line 181: ElseIf qsAction = "edit" Then
Line 182:
Line 183: If inputFileImage.FileContent.Length > 0 Then
Line 184:
Line 185: If Not inputFileImage.FileName.EndsWith(".jpg") Then
Line 186: Throw NoxForum.Framework.ExceptionSystem.MakeException("只允许.jpg图片")
Line 187: End If
Line 188:
Line 189: Dim filename As String
Line 190: filename = Server.MapPath(NoxForum.Framework.GallerySystem.GetPictureUrl(CInt(rsPics("pic_idnum").Value), New Guid(rsPics("pic_id").Value.ToString()), "ori"))
Line 191:
Line 192: Dim filepath
Line 193: filepath = System.IO.FileSystem.GetParentPath(filename)
Line 194: System.IO.FileSystem.CreateDirectory(filepath)
Line 195:
Line 196: inputFileImage.SaveAs(filename)
Line 197:
Line 198: End If
Line 199:
Line 200: rsPics.Update()
Line 201:
Line 202: Response.Redirect(Nox.Common.Helper.AbsolutePath("~/ox_pics/owner_op_rebuild.aspx?id={0}", rsPics("pic_id").Value))
Line 203: Response.End()
Line 204:
Line 205: ElseIf qsAction = "delete" Then
Line 206:
Line 207: Try
Line 208: System.IO.File.Delete(Server.MapPath(NoxForum.Framework.GallerySystem.GetPictureUrl(rsPics("pic_idnum").Value, New Guid(rsPics("pic_id").Value.ToString()), "pre")))
Line 209: System.IO.File.Delete(Server.MapPath(NoxForum.Framework.GallerySystem.GetPictureUrl(rsPics("pic_idnum").Value, New Guid(rsPics("pic_id").Value.ToString()), "ori")))
Line 210: Catch
Line 211: End Try
Line 212:
Line 213: rsPics.Delete()
Line 214:
Line 215: Response.Redirect(Nox.Common.Helper.AbsolutePath("~/ox_pics/pics_list.aspx?uid={0}", Nox.Common.Encoder.HtmlGuid(NoxForum.Framework.SecureSystem.CurrentUser.UserID)))
Line 216: Response.End()
Line 217:
Line 218: End If
Line 219:
Line 220: End If
Line 221:
Line 222: If Not Page.IsPostBack Then
Line 223:
Line 224: If qsAction <> "add" Then
Line 225: txtPictureTitle.Text = rsPics("pic_title").Value.ToString()
Line 226: txtPictureIntro.Text = rsPics("pic_intro").Value.ToString()
Line 227: imgPictureView.ImageUrl = NoxForum.Framework.GallerySystem.GetPictureUrl(CInt(rsPics.Fields("pic_idnum").Value), New Guid(rsPics.Fields("pic_id").Value.ToString()), "pre")
Line 228: abcPictureUrl.Text = Nox.Common.Encoder.Html("http://" + Request.Url.Host + NoxForum.Framework.GallerySystem.GetPictureUrl(CInt(rsPics.Fields("pic_idnum").Value), New Guid(rsPics.Fields("pic_id").Value.ToString()), "ori"))
Line 229: End If
Line 230:
Line 231: If qsAction = "add" Then
Line 232: abcActionTitle.Text = "图片上传"
Line 233:
Line 234: placeInfoView.Visible = False
Line 235: placeFormEdit.Visible = True
Line 236: placeFormDelete.Visible = False
Line 237:
Line 238: ElseIf qsAction = "edit" Then
Line 239:
Line 240: abcActionTitle.Text = "图片预览及上传"
Line 241:
Line 242: placeInfoView.Visible = True
Line 243: placeFormEdit.Visible = True
Line 244: placeFormDelete.Visible = False
Line 245:
Line 246:
Line 247: ElseIf qsAction = "delete" Then
Line 248: abcActionTitle.Text = "图片预览"
Line 249:
Line 250: placeInfoView.Visible = True
Line 251: placeFormEdit.Visible = False
Line 252: placeFormDelete.Visible = True
Line 253:
Line 254: End If
Line 255:
Line 256: End If
Line 257:
Line 258: End Sub
Line 259:
Line 260: #End ExternalSource
Line 261:
Line 262:
Line 263: Public Sub New()
Line 264: MyBase.New
Line 265: Dim dependencies() As String
Line 266: AppRelativeVirtualPath = "~/ox_pics/owner_pic_modi.aspx"
Line 267: If (Global.ASP.owner_pic_modi_aspx.__initialized = false) Then
Line 268: Global.ASP.owner_pic_modi_aspx.__stringResource = Me.ReadStringResource
Line 269: dependencies = New String(0) {}
Line 270: dependencies(0) = "~/ox_pics/owner_pic_modi.aspx"
Line 271: Global.ASP.owner_pic_modi_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
Line 272: Global.ASP.owner_pic_modi_aspx.__initialized = true
Line 273: End If
Line 274: Me.Server.ScriptTimeout = 30000000
Line 275: End Sub
Line 276:
Line 277: Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
Line 278: Get
Line 279: Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
Line 280: End Get
Line 281: End Property
Line 282:
Line 283: Protected ReadOnly Property ApplicationInstance() As ASP.Global_asax
Line 284: Get
Line 285: Return CType(Me.Context.ApplicationInstance,ASP.Global_asax)
Line 286: End Get
Line 287: End Property
Line 288:
Line 289: Private Function __BuildControlabcActionTitle() As Global.System.Web.UI.WebControls.Label
Line 290: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 291:
Line 292: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",202)
Line 293: __ctrl = New Global.System.Web.UI.WebControls.Label
Line 294:
Line 295: #End ExternalSource
Line 296: Me.abcActionTitle = __ctrl
Line 297: __ctrl.ApplyStyleSheetSkin(Me)
Line 298:
Line 299: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",202)
Line 300: __ctrl.ID = "abcActionTitle"
Line 301:
Line 302: #End ExternalSource
Line 303: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 304:
Line 305: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",202)
Line 306: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("图片操作名称"))
Line 307:
Line 308: #End ExternalSource
Line 309: Return __ctrl
Line 310: End Function
Line 311:
Line 312: Private Function __BuildControlimgPictureView() As Global.System.Web.UI.WebControls.Image
Line 313: Dim __ctrl As Global.System.Web.UI.WebControls.Image
Line 314:
Line 315: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",213)
Line 316: __ctrl = New Global.System.Web.UI.WebControls.Image
Line 317:
Line 318: #End ExternalSource
Line 319: Me.imgPictureView = __ctrl
Line 320: __ctrl.ApplyStyleSheetSkin(Me)
Line 321:
Line 322: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",213)
Line 323: __ctrl.BorderWidth = New System.Web.UI.WebControls.Unit(1, System.Web.UI.WebControls.UnitType.Pixel)
Line 324:
Line 325: #End ExternalSource
Line 326:
Line 327: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",213)
Line 328: __ctrl.ID = "imgPictureView"
Line 329:
Line 330: #End ExternalSource
Line 331: Return __ctrl
Line 332: End Function
Line 333:
Line 334: Private Function __BuildControlabcPictureUrl() As Global.System.Web.UI.WebControls.Label
Line 335: Dim __ctrl As Global.System.Web.UI.WebControls.Label
Line 336:
Line 337: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",275)
Line 338: __ctrl = New Global.System.Web.UI.WebControls.Label
Line 339:
Line 340: #End ExternalSource
Line 341: Me.abcPictureUrl = __ctrl
Line 342: __ctrl.ApplyStyleSheetSkin(Me)
Line 343:
Line 344: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",275)
Line 345: __ctrl.ID = "abcPictureUrl"
Line 346:
Line 347: #End ExternalSource
Line 348: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 349:
Line 350: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",275)
Line 351: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("绝对地址"))
Line 352:
Line 353: #End ExternalSource
Line 354: Return __ctrl
Line 355: End Function
Line 356:
Line 357: Private Function __BuildControlplaceInfoView() As Global.System.Web.UI.WebControls.PlaceHolder
Line 358: Dim __ctrl As Global.System.Web.UI.WebControls.PlaceHolder
Line 359:
Line 360: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",204)
Line 361: __ctrl = New Global.System.Web.UI.WebControls.PlaceHolder
Line 362:
Line 363: #End ExternalSource
Line 364: Me.placeInfoView = __ctrl
Line 365:
Line 366: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",204)
Line 367: __ctrl.ID = "placeInfoView"
Line 368:
Line 369: #End ExternalSource
Line 370:
Line 371: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",204)
Line 372: __ctrl.Visible = true
Line 373:
Line 374: #End ExternalSource
Line 375: Dim __ctrl1 As Global.System.Web.UI.WebControls.Image
Line 376:
Line 377: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",204)
Line 378: __ctrl1 = Me.__BuildControlimgPictureView
Line 379:
Line 380: #End ExternalSource
Line 381: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 382:
Line 383: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",204)
Line 384: __parser.AddParsedSubObject(__ctrl1)
Line 385:
Line 386: #End ExternalSource
Line 387: Dim __ctrl2 As Global.System.Web.UI.WebControls.Label
Line 388:
Line 389: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",204)
Line 390: __ctrl2 = Me.__BuildControlabcPictureUrl
Line 391:
Line 392: #End ExternalSource
Line 393:
Line 394: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",204)
Line 395: __parser.AddParsedSubObject(__ctrl2)
Line 396:
Line 397: #End ExternalSource
Line 398: __ctrl.SetRenderMethodDelegate(AddressOf Me.__RenderplaceInfoView)
Line 399: Return __ctrl
Line 400: End Function
Line 401:
Line 402: Private Sub __RenderplaceInfoView(ByVal __w As System.Web.UI.HtmlTextWriter, ByVal parameterContainer As System.Web.UI.Control)
Line 403: Me.WriteUTF8ResourceString(__w, 0, 885, true)
Line 404:
Line 405: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",213)
Line 406: parameterContainer.Controls(0).RenderControl(__w)
Line 407:
Line 408: #End ExternalSource
Line 409: Me.WriteUTF8ResourceString(__w, 885, 559, true)
Line 410:
Line 411: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",219)
Line 412: If Not IsDBNull(rsPics.Fields("size_ori_x").Value) Or IsDBNull(rsPics.Fields("size_ori_y").Value) Then
Line 413:
Line 414: #End ExternalSource
Line 415: Me.WriteUTF8ResourceString(__w, 1444, 488, false)
Line 416:
Line 417: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",224)
Line 418: __w.Write(rsPics.Fields("size_ori_x").Value & "x" & rsPics.Fields("size_ori_y").Value)
Line 419:
Line 420:
Line 421: #End ExternalSource
Line 422: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 423: " </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 424: " </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 425: " ")
Line 426:
Line 427: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",227)
Line 428: End If
Line 429:
Line 430: #End ExternalSource
Line 431:
Line 432: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",228)
Line 433: If Not IsDBNull(rsPics.Fields("size_pre_x").Value) Or IsDBNull(rsPics.Fields("size_pre_y").Value) Then
Line 434:
Line 435: #End ExternalSource
Line 436: Me.WriteUTF8ResourceString(__w, 1932, 488, false)
Line 437:
Line 438: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",233)
Line 439: __w.Write(rsPics.Fields("size_pre_x").Value & "x" & rsPics.Fields("size_pre_y").Value)
Line 440:
Line 441:
Line 442: #End ExternalSource
Line 443: Me.WriteUTF8ResourceString(__w, 2420, 641, false)
Line 444:
Line 445: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",240)
Line 446:
Line 447: Try
Line 448: If rsPics("size_pre_y").Value = rsPics("size_pre_x").Value Then
Line 449: Response.Write("C")
Line 450: ElseIf rsPics("size_pre_y").Value < rsPics("size_pre_x").Value Then
Line 451: Response.Write("H" & Int(rsPics("size_pre_y").Value / rsPics("size_pre_x").Value * 100))
Line 452: Else
Line 453: Response.Write("V" & Int(rsPics("size_pre_x").Value / rsPics("size_pre_y").Value * 100))
Line 454: End If
Line 455: Catch
Line 456: End Try
Line 457:
Line 458:
Line 459: #End ExternalSource
Line 460: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 461: " </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 462: " </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 463: " ")
Line 464:
Line 465: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",254)
Line 466: End If
Line 467:
Line 468: #End ExternalSource
Line 469: Me.WriteUTF8ResourceString(__w, 3061, 482, false)
Line 470:
Line 471: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",259)
Line 472: __w.Write(Nox.Common.Encoder.StrDate(rsPics("date_upload").Value))
Line 473:
Line 474:
Line 475: #End ExternalSource
Line 476: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 477: " </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 478: " </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 479: " ")
Line 480:
Line 481: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",262)
Line 482: If Not IsDBNull(rsPics.Fields("filesize_ori").Value) Then
Line 483:
Line 484: #End ExternalSource
Line 485: Me.WriteUTF8ResourceString(__w, 3543, 471, false)
Line 486:
Line 487: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",267)
Line 488: __w.Write(rsPics.Fields("filesize_ori").Value)
Line 489:
Line 490:
Line 491: #End ExternalSource
Line 492: Me.WriteUTF8ResourceString(__w, 4014, 789, false)
Line 493:
Line 494: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",275)
Line 495: parameterContainer.Controls(1).RenderControl(__w)
Line 496:
Line 497: #End ExternalSource
Line 498: Me.WriteUTF8ResourceString(__w, 4803, 341, true)
Line 499:
Line 500: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",279)
Line 501: End If
Line 502:
Line 503: #End ExternalSource
Line 504: Me.WriteUTF8ResourceString(__w, 5144, 470, true)
Line 505: End Sub
Line 506:
Line 507: Private Function __BuildControlinputFileImage() As Global.System.Web.UI.WebControls.FileUpload
Line 508: Dim __ctrl As Global.System.Web.UI.WebControls.FileUpload
Line 509:
Line 510: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",295)
Line 511: __ctrl = New Global.System.Web.UI.WebControls.FileUpload
Line 512:
Line 513: #End ExternalSource
Line 514: Me.inputFileImage = __ctrl
Line 515: __ctrl.ApplyStyleSheetSkin(Me)
Line 516:
Line 517: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",295)
Line 518: __ctrl.ID = "inputFileImage"
Line 519:
Line 520: #End ExternalSource
Line 521: Return __ctrl
Line 522: End Function
Line 523:
Line 524: Private Function __BuildControltxtPictureTitle() As Global.System.Web.UI.WebControls.TextBox
Line 525: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 526:
Line 527: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",314)
Line 528: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 529:
Line 530: #End ExternalSource
Line 531: Me.txtPictureTitle = __ctrl
Line 532: __ctrl.ApplyStyleSheetSkin(Me)
Line 533:
Line 534: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",314)
Line 535: __ctrl.ID = "txtPictureTitle"
Line 536:
Line 537: #End ExternalSource
Line 538:
Line 539: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",314)
Line 540: __ctrl.TextMode = System.Web.UI.WebControls.TextBoxMode.SingleLine
Line 541:
Line 542: #End ExternalSource
Line 543:
Line 544: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",314)
Line 545: __ctrl.Width = New System.Web.UI.WebControls.Unit(480, System.Web.UI.WebControls.UnitType.Pixel)
Line 546:
Line 547: #End ExternalSource
Line 548:
Line 549: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",314)
Line 550: __ctrl.Text = "图片标题"
Line 551:
Line 552: #End ExternalSource
Line 553: Return __ctrl
Line 554: End Function
Line 555:
Line 556: Private Function __BuildControltxtPictureIntro() As Global.System.Web.UI.WebControls.TextBox
Line 557: Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
Line 558:
Line 559: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",331)
Line 560: __ctrl = New Global.System.Web.UI.WebControls.TextBox
Line 561:
Line 562: #End ExternalSource
Line 563: Me.txtPictureIntro = __ctrl
Line 564: __ctrl.ApplyStyleSheetSkin(Me)
Line 565:
Line 566: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",331)
Line 567: __ctrl.ID = "txtPictureIntro"
Line 568:
Line 569: #End ExternalSource
Line 570:
Line 571: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",331)
Line 572: __ctrl.Rows = 5
Line 573:
Line 574: #End ExternalSource
Line 575:
Line 576: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",331)
Line 577: __ctrl.TextMode = System.Web.UI.WebControls.TextBoxMode.MultiLine
Line 578:
Line 579: #End ExternalSource
Line 580:
Line 581: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",331)
Line 582: __ctrl.Width = New System.Web.UI.WebControls.Unit(480, System.Web.UI.WebControls.UnitType.Pixel)
Line 583:
Line 584: #End ExternalSource
Line 585: Return __ctrl
Line 586: End Function
Line 587:
Line 588: Private Function __BuildControlplaceFormEdit() As Global.System.Web.UI.WebControls.PlaceHolder
Line 589: Dim __ctrl As Global.System.Web.UI.WebControls.PlaceHolder
Line 590:
Line 591: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",287)
Line 592: __ctrl = New Global.System.Web.UI.WebControls.PlaceHolder
Line 593:
Line 594: #End ExternalSource
Line 595: Me.placeFormEdit = __ctrl
Line 596:
Line 597: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",287)
Line 598: __ctrl.ID = "placeFormEdit"
Line 599:
Line 600: #End ExternalSource
Line 601: Dim __ctrl1 As Global.System.Web.UI.WebControls.FileUpload
Line 602:
Line 603: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",287)
Line 604: __ctrl1 = Me.__BuildControlinputFileImage
Line 605:
Line 606: #End ExternalSource
Line 607: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 608:
Line 609: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",287)
Line 610: __parser.AddParsedSubObject(__ctrl1)
Line 611:
Line 612: #End ExternalSource
Line 613: Dim __ctrl2 As Global.System.Web.UI.WebControls.TextBox
Line 614:
Line 615: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",287)
Line 616: __ctrl2 = Me.__BuildControltxtPictureTitle
Line 617:
Line 618: #End ExternalSource
Line 619:
Line 620: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",287)
Line 621: __parser.AddParsedSubObject(__ctrl2)
Line 622:
Line 623: #End ExternalSource
Line 624: Dim __ctrl3 As Global.System.Web.UI.WebControls.TextBox
Line 625:
Line 626: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",287)
Line 627: __ctrl3 = Me.__BuildControltxtPictureIntro
Line 628:
Line 629: #End ExternalSource
Line 630:
Line 631: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",287)
Line 632: __parser.AddParsedSubObject(__ctrl3)
Line 633:
Line 634: #End ExternalSource
Line 635: __ctrl.SetRenderMethodDelegate(AddressOf Me.__RenderplaceFormEdit)
Line 636: Return __ctrl
Line 637: End Function
Line 638:
Line 639: Private Sub __RenderplaceFormEdit(ByVal __w As System.Web.UI.HtmlTextWriter, ByVal parameterContainer As System.Web.UI.Control)
Line 640: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 641: " <td width=""95"" align=""right"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 642: " ")
Line 643:
Line 644: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",290)
Line 645: If qsAction = "add" Then
Line 646:
Line 647: #End ExternalSource
Line 648: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" <font color=""#FF000"& _
Line 649: "0"">*</font>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ")
Line 650:
Line 651: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",292)
Line 652: End If
Line 653:
Line 654: #End ExternalSource
Line 655: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" 图片文件:</td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 656: " <td width=""575"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 657: " ")
Line 658:
Line 659: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",295)
Line 660: parameterContainer.Controls(0).RenderControl(__w)
Line 661:
Line 662: #End ExternalSource
Line 663: __w.Write(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 664: " </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 665: " ")
Line 666:
Line 667: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",298)
Line 668: If qsAction = "edit" Then
Line 669:
Line 670: #End ExternalSource
Line 671: Me.WriteUTF8ResourceString(__w, 5614, 586, false)
Line 672:
Line 673: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",305)
Line 674: End If
Line 675:
Line 676: #End ExternalSource
Line 677: Me.WriteUTF8ResourceString(__w, 6200, 738, false)
Line 678:
Line 679: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",314)
Line 680: parameterContainer.Controls(1).RenderControl(__w)
Line 681:
Line 682: #End ExternalSource
Line 683: Me.WriteUTF8ResourceString(__w, 6938, 1278, false)
Line 684:
Line 685: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",331)
Line 686: parameterContainer.Controls(2).RenderControl(__w)
Line 687:
Line 688: #End ExternalSource
Line 689: Me.WriteUTF8ResourceString(__w, 8216, 679, false)
Line 690: End Sub
Line 691:
Line 692: Private Function __BuildControlplaceFormDelete() As Global.System.Web.UI.WebControls.PlaceHolder
Line 693: Dim __ctrl As Global.System.Web.UI.WebControls.PlaceHolder
Line 694:
Line 695: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",341)
Line 696: __ctrl = New Global.System.Web.UI.WebControls.PlaceHolder
Line 697:
Line 698: #End ExternalSource
Line 699: Me.placeFormDelete = __ctrl
Line 700:
Line 701: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",341)
Line 702: __ctrl.ID = "placeFormDelete"
Line 703:
Line 704: #End ExternalSource
Line 705: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 706:
Line 707: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",341)
Line 708: __parser.AddParsedSubObject(Me.CreateResourceBasedLiteralControl(8895, 628, false))
Line 709:
Line 710: #End ExternalSource
Line 711: Return __ctrl
Line 712: End Function
Line 713:
Line 714: Private Function __BuildControl__control2() As Global.System.Web.UI.HtmlControls.HtmlForm
Line 715: Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlForm
Line 716:
Line 717: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 718: __ctrl = New Global.System.Web.UI.HtmlControls.HtmlForm
Line 719:
Line 720: #End ExternalSource
Line 721:
Line 722: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 723: __ctrl.Method = "POST"
Line 724:
Line 725: #End ExternalSource
Line 726:
Line 727: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 728: __ctrl.Name = "MyForm"
Line 729:
Line 730: #End ExternalSource
Line 731: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 732:
Line 733: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 734: __parser.AddParsedSubObject(Me.CreateResourceBasedLiteralControl(9523, 425, false))
Line 735:
Line 736: #End ExternalSource
Line 737: Dim __ctrl1 As Global.System.Web.UI.WebControls.Label
Line 738:
Line 739: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 740: __ctrl1 = Me.__BuildControlabcActionTitle
Line 741:
Line 742: #End ExternalSource
Line 743:
Line 744: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 745: __parser.AddParsedSubObject(__ctrl1)
Line 746:
Line 747: #End ExternalSource
Line 748:
Line 749: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 750: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl("</strong></td>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </tr>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 751: " "))
Line 752:
Line 753: #End ExternalSource
Line 754: Dim __ctrl2 As Global.System.Web.UI.WebControls.PlaceHolder
Line 755:
Line 756: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 757: __ctrl2 = Me.__BuildControlplaceInfoView
Line 758:
Line 759: #End ExternalSource
Line 760:
Line 761: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 762: __parser.AddParsedSubObject(__ctrl2)
Line 763:
Line 764: #End ExternalSource
Line 765:
Line 766: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 767: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 768:
Line 769: #End ExternalSource
Line 770: Dim __ctrl3 As Global.System.Web.UI.WebControls.PlaceHolder
Line 771:
Line 772: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 773: __ctrl3 = Me.__BuildControlplaceFormEdit
Line 774:
Line 775: #End ExternalSource
Line 776:
Line 777: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 778: __parser.AddParsedSubObject(__ctrl3)
Line 779:
Line 780: #End ExternalSource
Line 781:
Line 782: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 783: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "))
Line 784:
Line 785: #End ExternalSource
Line 786: Dim __ctrl4 As Global.System.Web.UI.WebControls.PlaceHolder
Line 787:
Line 788: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 789: __ctrl4 = Me.__BuildControlplaceFormDelete
Line 790:
Line 791: #End ExternalSource
Line 792:
Line 793: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 794: __parser.AddParsedSubObject(__ctrl4)
Line 795:
Line 796: #End ExternalSource
Line 797:
Line 798: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",197)
Line 799: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" </table>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
Line 800: " "))
Line 801:
Line 802: #End ExternalSource
Line 803: Return __ctrl
Line 804: End Function
Line 805:
Line 806: Private Sub __BuildControlTree(ByVal __ctrl As owner_pic_modi_aspx)
Line 807:
Line 808: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",1)
Line 809: __ctrl.EnableViewState = false
Line 810:
Line 811: #End ExternalSource
Line 812:
Line 813: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",1)
Line 814: Me.InitializeCulture
Line 815:
Line 816: #End ExternalSource
Line 817: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
Line 818:
Line 819: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",1)
Line 820: __parser.AddParsedSubObject(Me.CreateResourceBasedLiteralControl(9948, 1859, false))
Line 821:
Line 822: #End ExternalSource
Line 823: Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlForm
Line 824:
Line 825: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",1)
Line 826: __ctrl1 = Me.__BuildControl__control2
Line 827:
Line 828: #End ExternalSource
Line 829:
Line 830: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",1)
Line 831: __parser.AddParsedSubObject(__ctrl1)
Line 832:
Line 833: #End ExternalSource
Line 834:
Line 835: #ExternalSource("d:\zhaix\websites\cndev.org#www\ox_pics\owner_pic_modi.aspx",1)
Line 836: __parser.AddParsedSubObject(Me.CreateResourceBasedLiteralControl(11807, 477, true))
Line 837:
Line 838: #End ExternalSource
Line 839: End Sub
Line 840:
Line 841: Protected Overrides Sub FrameworkInitialize()
Line 842: MyBase.FrameworkInitialize
Line 843: SetStringResourcePointer(Global.ASP.owner_pic_modi_aspx.__stringResource, 0)
Line 844: Me.__BuildControlTree(Me)
Line 845: Me.AddWrappedFileDependencies(Global.ASP.owner_pic_modi_aspx.__fileDependencies)
Line 846: End Sub
Line 847:
Line 848: Public Overrides Function GetTypeHashCode() As Integer
Line 849: Return -1861303372
Line 850: End Function
Line 851: End Class
Line 852: End Namespace
Line 853:





--------------------------------------------------------------------------------
Version Information: Microsoft .NET Framework Version:2.0.50215.44; ASP.NET Version:2.0.50215.44
日出东海落西山,愁也一天,喜也一天;遇事不钻牛角尖,人也舒坦,心也舒坦。

相关信息:


欢迎光临本社区,您还没有登录,不能发贴子。请在 这里登录