小区物业管理系统-物业管理员页面

最新推荐文章于 2023-06-01 21:09:32 发布
最新推荐文章于 2023-06-01 21:09:32 发布
阅读量1.2k 收藏 6
点赞数 1
分类专栏： VB.NET_简易小区物业管理系统开发 文章标签： vb.net
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/qq_41607217/article/details/117716830
版权

小区物业管理系统-物业管理员页面

主页面

在这里插入图片描述
在这里插入图片描述

添加业主

在这里插入图片描述

Public Class PropertyManager_Pro_insert
    'bug:插入：若删除一个，用count就会插入相同的，导致插入错误

    Dim proprietor As New Proprietor

    Public Sub New(s As String)
        InitializeComponent()

    End Sub
    Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
        'MsgBox(Len(TextBox1.Text))

        If (TextBox1.Text = "" Or Len(TextBox1.Text) > 5) Then
            MsgBox("请输入姓名或姓名格式错误！")
        Else
            If (RadioButton1.Checked = False And RadioButton2.Checked = False) Then
                MsgBox("请选择性别！")
            Else
                If (TextBox3.Text = "" Or Int(TextBox3.Text) < 0 Or Int(TextBox3.Text) > 150) Then
                    MsgBox("请输入正确年龄！")
                Else
                    If (TextBox4.Text = "" Or Len(TextBox4.Text) > 5) Then
                        MsgBox("请输入籍贯或籍贯格式错误！")
                    Else
                        If (proprietor.fGet = False) Then
                            MsgBox("请选择房屋和车库")
                        Else
                            proprietor.pnameSet(TextBox1.Text)
                            If (RadioButton1.Checked = True) Then
                                proprietor.psexSet("男")
                            End If
                            If (RadioButton2.Checked = True) Then
                                proprietor.psexSet("女")
                            End If
                            proprietor.pageSet(Int(TextBox3.Text))
                            proprietor.pnativeSet(TextBox4.Text)

                            Dim i As Integer = y()
                            proprietor.pnoSet("Y00" + i)
                            ' MsgBox(proprietor.pnoGet)
                            NumberUpdata("y", i + 1)
                            proprietorAllInsert(proprietor)


                            Dim user As New User
                            user.usernameSet(proprietor.pnoGet)
                            user.tableSet("User_Proprietor")
                            User_Insert(user)
                            cost_Insert(proprietor.pnoGet, proprietor.p_bnoGet)
                            Label9.Text = "成功：请记住业主号"
                            Label12.Text = proprietor.pnoGet
                            Label16.Text = "系统初始密码:123"
                        End If
                    End If
                End If
            End If
        End If
    End Sub


    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim pbg As New PropertyManager_Pro_insert_B_G(proprietor)
        pbg.ShowDialog()

        'MsgBox(proprietor.p_gnoGet)
        'MsgBox(proprietor.p_bnoGet)
        If (proprietor.fGet) Then
            Button1.Visible = False
            Button2.Visible = False
            Label2.Visible = True
            Label6.Visible = True
            Label6.Text = BuildingAddresss(proprietor.p_bnoGet)
            Label2.Text = garageAll(proprietor.p_gnoGet)
        End If
    End Sub


    Private Sub PropertyManager_Pro_insert_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        '设置同步时间显示

        proprietor.fSet(False)
        Label2.Visible = False
        Label6.Visible = False
        Button1.Visible = True
        Button2.Visible = True

        Label10.Text = Format(Now, "yyyy-mm-dd")
        Label11.Text = Format(Now, "hh:mm:ss")

        Label9.Text = ""
        Label12.Text = ""
        Label16.Text = ""
    End Sub

    Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
        Me.Close()
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim pbg As New PropertyManager_Pro_insert_B_G(proprietor)
        pbg.ShowDialog()

        'MsgBox(proprietor.p_gnoGet)
        'MsgBox(proprietor.p_bnoGet)
        If (proprietor.fGet) Then
            Button1.Visible = False
            Button2.Visible = False
            Label2.Visible = True
            Label6.Visible = True
            Label6.Text = BuildingAddresss(proprietor.p_bnoGet)
            Label2.Text = garageAll(proprietor.p_gnoGet)
        End If
    End Sub


End Class

业主查询

在这里插入图片描述
在这里插入图片描述

Public Class PropertyManager_Pro_add
    Dim prop As Proprietor
    Public Sub New(u As String)
        InitializeComponent()
    End Sub
    Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
        If (proprietorSelectCount(TextBox1.Text) > 0) Then
            Button8.Visible = False
            Button9.Visible = False

            Label18.Visible = False
            TextBox1.Visible = False


            Label1.Visible = True
            Label2.Visible = True
            Label3.Visible = True

            Label5.Visible = True
            Label6.Visible = True
            Label7.Visible = True
            Label8.Visible = True
            Label9.Visible = True
            Label10.Visible = True
            Label11.Visible = True
            Label12.Visible = True
            Label16.Visible = True
            Label17.Visible = True

            Button2.Visible = True
            Button3.Visible = True
            Button4.Visible = True

            Button6.Visible = True

            prop = proprietorForPnoName(TextBox1.Text)

            Label10.Text = prop.pnoGet()
            Label17.Text = prop.pnameGet()
            Label16.Text = prop.psexGet()
            Label12.Text = prop.pageGet()
            Label11.Text = prop.pnativeGet()
            Label6.Text = garageAll(prop.p_gnoGet())
            Label9.Text = BuildingAddresss(prop.p_bnoGet)

        Else
            MsgBox("业主不存在！！！")
        End If
    End Sub

    Private Sub PropertyManager_Pro_add_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Label19.Text = Format(Now, "yyyy-mm-dd")
        Label4.Text = Format(Now, "hh:mm:ss")

        Label1.Visible = False
        Label2.Visible = False
        Label3.Visible = False

        Label5.Visible = False
        Label6.Visible = False
        Label7.Visible = False
        Label8.Visible = False
        Label9.Visible = False
        Label10.Visible = False
        Label11.Visible = False
        Label12.Visible = False
        Label16.Visible = False
        Label17.Visible = False

        Button2.Visible = False
        Button3.Visible = False
        Button4.Visible = False

        Button6.Visible = False
    End Sub
    Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click
        Me.Close()
    End Sub

    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        Dim user As User = User_Select(prop.pnoGet, "User_Proprietor")
        user.tableSet("User_Proprietor")
        Dim uer As New Proprietor_UserUpdata(user)
        uer.ShowDialog()
    End Sub

    Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
        Me.Close()
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        '删除
        MsgBox(prop.pnoGet)

        User_Delete(prop.pnoGet)
        cost_Delete(prop.pnoGet)
        proprietor_Delete(prop.pnoGet)
        MsgBox("删除成功")
        Me.Close()
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        Dim uer As New PropertyManager_Pro_updata(prop)
        uer.ShowDialog()

        prop = proprietorAll(prop.pnoGet)
         Label10.Text = prop.pnoGet()
        Label17.Text = prop.pnameGet()
        Label16.Text = prop.psexGet()
        Label12.Text = prop.pageGet()
        Label11.Text = prop.pnativeGet()
        Label6.Text = garageAll(prop.p_gnoGet())
        Label9.Text = BuildingAddresss(prop.p_bnoGet)

    End Sub
End Class

修改业主信息

在这里插入图片描述

Public Class PropertyManager_Pro_updata
    Dim proprietor As Proprietor
    Dim jbno, jgno As String
    Public Sub New(p As Proprietor)
        InitializeComponent()
        proprietor = p
    End Sub
    Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
        'MsgBox(Len(TextBox1.Text))

        If (TextBox1.Text = "" Or Len(TextBox1.Text) > 5) Then
            MsgBox("请输入姓名或姓名格式错误！")
        Else
            If (RadioButton1.Checked = False And RadioButton2.Checked = False) Then
                MsgBox("请选择性别！")
            Else
                If (TextBox3.Text = "" Or Int(TextBox3.Text) < 0 Or Int(TextBox3.Text) > 150) Then
                    MsgBox("请输入正确年龄！")
                Else
                    If (TextBox4.Text = "" Or Len(TextBox4.Text) > 5) Then
                        MsgBox("请输入籍贯或籍贯格式错误！")
                    Else
                            proprietor.pnameSet(TextBox1.Text)
                            If (RadioButton1.Checked = True) Then
                                proprietor.psexSet("男")
                            End If
                            If (RadioButton2.Checked = True) Then
                                proprietor.psexSet("女")
                            End If
                            proprietor.pageSet(Int(TextBox3.Text))
                            proprietor.pnativeSet(TextBox4.Text)

                            ' MsgBox(proprietor.pnoGet)
                            proprietorUP(proprietor)

                            Me.Close()
                    End If
                End If
            End If
        End If
    End Sub


    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim pbg As New PropertyManager_Pro_insert_B_G(proprietor)
        pbg.ShowDialog()

        'MsgBox(proprietor.p_gnoGet)
        'MsgBox(proprietor.p_bnoGet)
        If (proprietor.fGet) Then
            Button1.Visible = False

       
            Label6.Text = BuildingAddresss(proprietor.p_bnoGet)
            Label2.Text = garageAll(proprietor.p_gnoGet)


        End If
    End Sub
    Private Sub PropertyManager_Pro_updata_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        '设置同步时间显示
        Proprietor.fSet(False)

        Label10.Text = Format(Now, "yyyy-mm-dd")
        Label11.Text = Format(Now, "hh:mm:ss")

        'proprietor = proprietorAll("Y002")

        TextBox1.Text = Trim(proprietor.pnameGet())
        If (proprietor.psexGet() = "男") Then
            RadioButton1.Checked = True
        End If
        If (proprietor.psexGet() = "女") Then
            RadioButton2.Checked = True
        End If
        'MsgBox(proprietor.p_bnoGet)

        TextBox3.Text = proprietor.pageGet()
        TextBox4.Text = Trim(proprietor.pnativeGet())
        Label6.Text = BuildingAddresss(proprietor.p_bnoGet)
        Label2.Text = garageAll(proprietor.p_gnoGet)
        jbno = proprietor.p_bnoGet
        jgno = proprietor.p_gnoGet
    End Sub
    Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
        Me.Close()
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        '设置同步时间显示
        proprietor.fSet(False)

        'proprietor = proprietorAll("Y002")

        TextBox1.Text = Trim(proprietor.pnameGet())
        If (proprietor.psexGet() = "男") Then
            RadioButton1.Checked = True
        End If
        If (proprietor.psexGet() = "女") Then
            RadioButton2.Checked = True
        End If
        'MsgBox(proprietor.p_bnoGet)

        TextBox3.Text = proprietor.pageGet()
        TextBox4.Text = Trim(proprietor.pnativeGet())
        Label6.Text = BuildingAddresss(jbno)
        Label2.Text = garageAll(jgno)
        Button1.Visible = True
    End Sub
End Class

房屋车库选择

在这里插入图片描述

Public Class PropertyManager_Pro_insert_B_G
    Dim pro As Proprietor
    Public Sub New(p As Proprietor)
        InitializeComponent()
        pro = p
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        ListBox1.Items.Clear()
        ListBox2.Items.Clear()
        ListBox3.Items.Clear()
        ListBox4.Items.Clear()
        ListBox5.Items.Clear()
        Label1.Text = ""
        Label2.Text = ""
        ListBox1.Visible = True
        ListBox2.Visible = True
        ListBox4.Visible = True
        ListBox3.Visible = True
        Label5.Visible = True
        Label6.Visible = True
        Label7.Visible = True
        Label8.Visible = True

        Button2.Visible = False
        ListBox5.Visible = False
        Button4.Visible = False
        Dim s() As String = BuildingForBarea()
        For i = 1 To Int(s(0))
            ListBox1.Items.Add(s(i))
        Next
    End Sub

    Private Sub PropertyManager_Pro_insert_B_G_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Label1.Text = ""
        Label2.Text = ""

        Label10.Text = Format(Now, "yyyy-mm-dd")
        Label11.Text = Format(Now, "hh:mm:ss")

        Button2.Visible = False
        ListBox5.Visible = False
        Button4.Visible = False
        Dim s() As String = BuildingForBarea()
        For i = 1 To Int(s(0))
            ListBox1.Items.Add(s(i))
        Next
    End Sub

    Private Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox1.SelectedIndexChanged
        Label1.Text = ListBox1.Text + "区 "
        ListBox2.Items.Clear()
        Dim s() As String = BuildingForBlouno(ListBox1.Text)
        For i = 1 To Int(s(0))
            ListBox2.Items.Add(s(i))
        Next

    End Sub

    Private Sub ListBox2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox2.SelectedIndexChanged
        Label1.Text = Label1.Text + ListBox2.Text + "号楼 "
        ListBox3.Items.Clear()
        Dim s() As String = BuildingForBapartment(ListBox1.Text, ListBox2.Text)
        For i = 1 To Int(s(0))
            ListBox3.Items.Add(s(i))
        Next
    End Sub

    Private Sub ListBox3_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox3.SelectedIndexChanged
        Label1.Text = Label1.Text + ListBox3.Text + "单元 "
        ListBox4.Items.Clear()
        Dim s() As String = BuildingForBRoomNo(ListBox1.Text, ListBox2.Text, ListBox3.Text)
        For i = 1 To Int(s(0))
            ListBox4.Items.Add(s(i))
        Next
    End Sub

    Private Sub ListBox4_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox4.SelectedIndexChanged
        Label1.Text = Label1.Text + ListBox4.Text + "户"
        Button2.Visible = True
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        ListBox1.Visible = False
        ListBox2.Visible = False
        ListBox4.Visible = False
        ListBox3.Visible = False
        Label5.Visible = False
        Label6.Visible = False
        Label7.Visible = False
        Label8.Visible = False


        Button2.Visible = False


        ListBox5.Visible = True
        pro.p_bnoSet(BuildingForBno(ListBox1.Text, ListBox2.Text, ListBox3.Text, ListBox4.Text))
        'MsgBox(pro.p_bnoGet)
        Dim s() As String = GarageGaddress()
        For i = 1 To Int(s(0))
            ListBox5.Items.Add(s(i))
        Next
    End Sub

    Private Sub ListBox5_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox5.SelectedIndexChanged
        Label2.Text = ListBox5.Text
        Button4.Visible = True
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

        Me.Close()
    End Sub

    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        pro.p_gnoSet(GarageGno(ListBox5.Text))
        'MsgBox(pro.p_gnoGet)
        pro.fSet(True)
        Me.Close()
    End Sub
End Class

费用

在这里插入图片描述
在这里插入图片描述

Public Class Free_Updata
    Dim cost As Cost
    Public Sub New(s As String)
        InitializeComponent()
    End Sub
    Private Sub Free_Updata_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Label19.Text = Format(Now, "yyyy-mm-dd")
        Label4.Text = Format(Now, "hh:mm:ss")
        GroupBox1.Visible = False
        Label17.Visible = False
        Label10.Visible = False
        Label12.Visible = False
        Label16.Visible = False
        Label11.Visible = False
    End Sub

    Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
        If (costSelectCount(TextBox1.Text)) Then
            Label17.Visible = True
            GroupBox1.Visible = True

            cost = cost_Select(TextBox1.Text)
            Label9.Text = cost.cwaterGet
            Label8.Text = cost.celectricityGet
            Label7.Text = cost.cgasGet
            Label6.Text = cost.cpropertyGet

            Label17.Text = BuildingAddresss(cost.c_bnoGet) + " " + proprietorName(cost.c_pnoGet)
            freeQian()
        Else
            MsgBox("业主不存在！")
        End If

    End Sub
    Public Sub freeQian()
        If (cost.cwaterGet < 0) Then
            Label10.Visible = True
            Label10.Text = "欠费"
        Else
            Label10.Visible = False
        End If
        If (cost.celectricityGet < 0) Then
            Label12.Visible = True
            Label12.Text = "欠费"
        Else
            Label12.Visible = False
        End If
        If (cost.cgasGet < 0) Then
            Label16.Visible = True
            Label16.Text = "欠费"
        Else
            Label16.Visible = False
        End If
        If (cost.cpropertyGet < 0) Then
            Label11.Visible = True
            Label11.Text = "欠费"
        Else
            Label11.Visible = False
        End If
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If (Int(TextBox2.Text) > 0) Then
            Dim x As Double = CDbl(TextBox1.Text)
            Label9.Text = CDbl(Label9.Text) + x
            ' MsgBox(CDbl(Label6.Text))
            cost_Updata("Cwater", cost.c_pnoGet, CDbl(Label9.Text))
        Else
            MsgBox("请正确缴费！")

        End If
        freeQian()
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        If (Int(TextBox3.Text) > 0) Then
            Dim x As Double = CDbl(TextBox3.Text)
            Label8.Text = CDbl(Label8.Text) + x
            cost_Updata("Celectricity", cost.c_pnoGet, CDbl(Label8.Text))
        Else
            MsgBox("请正确缴费！")

        End If
        freeQian()
    End Sub

    Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
        If (Int(TextBox5.Text) > 0) Then
            Dim x As Double = CDbl(TextBox5.Text)
            Label7.Text = CDbl(Label7.Text) + x
            cost_Updata("Cgas", cost.c_pnoGet, CDbl(Label7.Text))
        Else
            MsgBox("请正确缴费！")

        End If
        freeQian()
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        If (Int(TextBox4.Text) > 0) Then
            Dim x As Double = CDbl(TextBox4.Text)
            Label6.Text = CDbl(Label6.Text) + x
            cost_Updata("Cproperty", cost.c_pnoGet, CDbl(Label6.Text))
        Else
            MsgBox("请正确缴费！")

        End If
        freeQian()
    End Sub

    Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
        Me.Close()
    End Sub
End Class
CaoPengCheng&
关注
  • 1
    点赞
  • 踩
  • 6
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论
专栏目录
计算机毕业设计PHP小区物业管理系统（源码+程序+VUE+lw+部署）
node-php毕设程序源码
01-30 700
该项目含有源码、文档、程序、数据库、配套开发软件、软件安装教程。欢迎交流项目运行环境配置：。项目技术：原生PHP ++ Vue 等等组成，B/S模式 +Vscode管理+前后端分离等等。环境需要1.运行环境：最好是小皮phpstudy最新版，我们在这个版本上开发的。其他版本理论上也可以。2.开发环境：Vscode或HbuilderX都可以。推荐HbuilderX;3.mysql环境：建议是用5.7版本均可4.硬件环境：windows 7/8/10 1G内存以上；
计算机毕业设计ssm小区物业管理系统0o8o89（附源码）新手必备
m0_73180671的博客
09-12 333
项目运行环境配置：Jdk1.8 + Tomcat7.0 + Mysql + HBuilderX（Webstorm也行）+ Eclispe（IntelliJ IDEA,Eclispe,MyEclispe,Sts都支持）。项目技术：ssm + mybatis + Maven +mysql5.7或8.0等等组成，B/S模式 + Maven管理等等。环境需要1.运行环境：最好是java jdk 1.8，我们在这个平台上运行的。其他版本理论上也可以。
java计算机毕业设计基于springboo+vue的小区物业管理系统
z459382737的博客
08-17 1064
紧随着中国市场经济的极速发展、人民生活水平的不断提高，住宅楼已经成为了人们安家、置业的第一选择，各式各样的小区住宅比比皆是。现在，人们赚的钱变得越来越多，人们对住宅的各种要求也变得更多：住宅区整体外观、绿化、住宅周边的学校建设和道路建设、住房的质量和安全的要求也逐渐提高，同样也对小区物业的的服务态度和管理模式也要求很高。...
【附源码】计算机毕业设计SSM小区物业管理系统
计算机程序华哥
10-24 1620
项目运行环境配置：（Webstorm也行）+ Eclispe（IntelliJ IDEA,Eclispe,MyEclispe,Sts都支持）。项目技术：等等组成，B/S模式 + Maven管理等等。环境需要1.运行环境：最好是java jdk 1.8，我们在这个平台上运行的。其他版本理论上也可以。2.IDE环境：IDEA，Eclipse,Myeclipse都可以。推荐IDEA;3.tomcat环境：Tomcat 7.x,8.x,9.x版本均可4.
java毕业设计论文题目基于SSM实现的小区物业管理系统[包运行成功]
m0_37775035的博客
09-03 459
基于SSM实现的小区物业管理系统》该项目采用技术后端框架SSM（SpringMVC、Spring、Mybatis），前端框架easyui、h-ui、jQuery、tomcat服务器、mysql数据库 ,MVC模式，项目含有源码、论文、配套开发软件、软件安装教程、项目发布教程1.1 研究背景及意义随着国际经济一体化的发展，信息管理以及信息的合理应用有着举足轻重的地位。目前来说，中国的房地产行业正迅猛的发展，生活小区的规模也不断扩大，同时小区的设备也在逐步更新并且日渐趋于信息化和智能化。
JAVA小区物业管理系统(源代码+论文).rar
04-14
【JAVA小区物业管理系统】是一个基于Java技术开发的综合性管理平台，旨在提高小区物业管理的效率和服务质量。该系统包含了源代码和相关论文，为学习和理解Java应用开发提供了实践案例。 一、系统概述 该物业管理...
小区物业管理系统-毕业设计.zip
最新发布
03-15
5. **权限管理**：小区物业管理系统中，不同角色（如物业管理员、业主）应有不同的操作权限，因此需要实现权限控制模块，如RBAC（Role-Based Access Control）模型。 6. **物业管理功能**：可能包括物业缴费、报修...
数据库论文小区物业管理系统样本.doc
11-21
系统主要功能模块包括顾客登录、管理员登录、注册页面、编辑模块、查询模块、顾客评价模块和相关信息模块。 在数据库设计方面，该系统采用 E-R 模型实体关系图来描述实体之间的关系。实体包括业主信息、收费信息、...
java项目-第47期基于ssm的小区物业管理系统.zip
01-29
java项目-第47期基于ssm的小区物业管理系统.zip 1、项目简述 该项目主要针对物业小区，对业主进行的一系列管理，包括业主缴费、业主报修、投诉，小区管理员可以实时进行监测查看和管理，方便小区 智能化运转。该系统...
小区物业管理系统源码aspx
12-13
【小区物业管理系统源码aspx】是一个专门为住宅小区设计的管理信息系统，主要目的是提升物业管理的效率和服务质量。这个系统基于ASP.NET技术开发，ASP.NET是微软公司推出的一种Web应用程序框架，用于构建动态、数据...
物业管理系统后台界面(ui)
01-29
物业管理系统后台界面(ui),可用于其他行业,值得参考
物业后台管理界面
08-07
物业后台管理平台，html与js界面优美，只有前端没有后台。欢迎下载。
小区物业管理系统
07-15
一个完整的小区物业管理系统，信管作业，页面精美，功能全面，涉及增删改查，逻辑完美，用就好了，哈哈哈哈
小区物业管理系统（C/S软件结构，精美界面设计）
05-08
小区物业管理系统（C/S软件结构，精美界面设计）
可以真实运行的小区物业管理系统源码
05-03
此源码是作者花几十元买的，希望对大家有用，谢谢 功能描述： 具备以下的功能： 1、收费管理 2、住户管理 3、房间设置 4、单价设置 5、通知单打印 6、导入收费Excel表 7、导出收费Excel表 8、导入住户Excel表 9、导出住户Excel表 打印通知单功能采用水晶报表制作，很方便拓展。VS2010下安装水晶报表。 软件采用多层模式开发，界面非常漂亮。是一款适合您应用到各种小区或者大厦的物业管理软件。同时也是一款非常适合学习或者做二次开发的软件。
基于web的小区物业管理系统
m0_61146017的博客
06-22 368
技术：Java、JSP等 摘要： 随着科学的进步，以及互联网的急速发展。Internet已经成为人们生活、工作、学习越来越离不开的平台。例如网上电子商务、社会信息数据库等。网络实现了远程通讯，人们能够通过计算机网络进行电子邮件的发送，召开网络会议，网上购物，甚至坐在家里就可以上大学。 对于小区物业管理来说，其工作流程的繁杂性、多样化、管理复杂、收缴费用与设备维护繁琐。计算机已完全能够胜任物业管理工作，而且更加准确、方便、快捷、高效、清晰、透明，它完全可以克服以上所述的不足之处。因此，建立一个基于B/S框架的
基于vuex的物业管理系统APP及网页后台设计
毕业作品网站
09-26 1103
Vue在数据交互，组件化开发方面有非常大的优势，每个组件都是一个.vue文件，可以把页面拆成很多组件，方便开发与维护，使用时只需引入组件即可，通过vue-router实现路由跳转，可以很容易地创建单页面应用程序，本文转载自http://www.biyezuopin.vip/onews.asp?前台客户端是展现给用户的，包括登录注册、查看个人房间信息、查看家庭报修信息、报修故障、撤销报修、在线缴费、查看家庭成员、审核家庭成员、删除家庭成员、查看与编辑个人信息。24. 注册（注册成功后须业主审核后才可登录）
[附源码]java毕业设计小区物业管理系统
李会计算机程序设计
11-21 3995
项目运行环境配置：Jdk1.8 + Tomcat7.0 + Mysql + HBuilderX（Webstorm也行）+ Eclispe（IntelliJ IDEA,Eclispe,MyEclispe,Sts都支持）。项目技术：SSM + mybatis + Maven + Vue 等等组成，B/S模式 + Maven管理等等。环境需要1.运行环境：最好是java jdk 1.8，我们在这个平台上运行的。其他版本理论上也可以。2.IDE环境：IDEA，Eclipse,Myeclipse都可以。
C++ 小区物业管理系统（QT图形界面）
来份煎蛋吧^的博客
06-01 1074
(l）物业管理信息应包括: 小区资料（小区名称﹐楼宇总数等），房型资料(房型编号、房型﹒建筑面积等），住户资料（住户编号﹑住户姓名﹒联系电话﹒联系地址﹒预付金额﹒欠费金额等〉，住户报修管理，住户投诉管理，住户停车车位管理（车位编号，住户信息等〉，住户物业收费管理(收费名称、收费金额、收费单位﹒收费周期等）等。 (2）需要设置普通用户、超级管理员不同角色（总人数需大于100人），不同角色登录后的权限各不相同。普通用户可以进行查询自己个人信息、修改个人基本资料﹑报修﹒投诉等操作﹔超级管理员有对小区资料进行查询、
ASP小区物业管理系统.doc
05-11
"ASP小区物业管理系统的设计与实现" 本文主要探讨了如何使用ASP（Active Server Pages）技术构建一个基于Web的小区物业管理系统。该系统旨在提供一个便捷、高效的平台，用于管理房屋资料和住户信息，适应现代物业...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

CaoPengCheng&

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付：¥1
获取中
扫码支付

您的余额不足，请更换扫码支付或充值

打赏作者

实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值