housesaleprint.aspx.vb

来自「与房地产相关的各项活动」· VB 代码 · 共 22 行

'文件名：HouseSalePrint.aspx.vb
Partial Class HouseManage_HouseSalePrint
    Inherits System.Web.UI.Page
    Private MyPrintForm As HouseManage_HouseSaleForm
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        MyPrintForm = Context.Handler
        Me.Label3.Text = MyPrintForm.MyPrint房源编号
        If (Session("MyCompanyPhone") IsNot Nothing) Then
            Me.Label2.Text = "联系电话：" + Session("MyCompanyPhone").ToString()
        End If
        If (Session("MyCompanyName") IsNot Nothing) Then
            Me.Label1.Text = Session("MyCompanyName").ToString() + "出售房源"
        End If
        Me.Label4.Text = MyPrintForm.MyPrint建成年份
        Me.Label5.Text = MyPrintForm.MyPrint房屋产权
        Me.Label6.Text = MyPrintForm.MyPrint建筑面积
        Me.Label7.Text = MyPrintForm.MyPrint房型物管费
        Me.Label8.Text = MyPrintForm.MyPrint家电家私
        Me.Label9.Text = MyPrintForm.MyPrint配套设施
    End Sub
End Class