VB494 基于VB电信业务计费账务系统

为各运营商的下一个重要的利润增长点。目前，电信的用户正在急剧地增长，电信运营企业原来的计费系统由于管理模式的落后及使用技术的限制，制约着现时的电信运营企业的发展，不能满足因用户数量的增长而对处理速度的要求。如果没有使用合理的计费方法，服务提供商就无法充分了解用户正在怎样利用他们的资源，结果就会在吸收新用户群、调整收入减少损失以及尽早预测市场爆炸性增长趋势等方面失去有利的机会。。计费帐务系统作为移动通信企业经营管理的核心直接关系着企业的内部管理、对外服务，是全面影响企业竞争实力的要素之一。传统的计费帐务系统以帐务为核心，在移动通信企业内主要扮演着数据处理工具的角色。系统的自动化程度很低，需人工参与的过程很多，业务逻辑简单且可扩充性差；另外系统的定位使其在决策支持、错误处理、审核校验和与其它系统的对接等方面往往考虑较少，已很难满足移动通信企业大量复杂的业务处理的要求，从而严重削弱了企业的竞争能力，迫切需要一种自动化程度高的现代计费帐务系统。
设计（论文）的意义是（理论或实际）：
     移动通信技术的不断发展,新技术、新设备不断出现,使得我国的移动通信行业加快了发展脚步。各家移动运营商也从单纯的价格竞争向通过技术优势、系统的管理提高自身的竞争力。在这种情况下,如何有效地管理和维护现有的电信网络,提高工作效率及网络资源的利用率,不断推出新的业务,增强市场竞争力,是摆在各移动运营商面前的一个重要课题。综合营业帐务系统采用“集中管理、集中客服、集中计费结算”的模式,对已经开通经营的所有电信业务进行综合管理,向各业务部门提供一个能满足经营各种电信业务运营需要的高起点、高性能的多业务有机融合的综合性客服计费结算系统平台,使各业务部门在经营中能向用户提供高效率、高质量的服务,从而保证武汉移动在竞争激烈的经营环境中能够得到最大的经济效益。

copyright think58

[资料来源：www.THINK58.com]

[版权所有：http://think58.com]

阶段。如在查找情报资料、处理银行帐目、仓库管理、科研生产等方面，无不需要利用大量的信息资源。因此，如何有效地进行数据信息的管理和利用，已经成为人们普遍关注的课题。
信息在不同的领域里有着不同的概念，在管理科学领域中，通常认为信息是经过加工处理后的一种数据形式，是一种有次序的符号排列，它是系统传输和处理的对象。处在信息时代的今天，信息的作用越来越为人们所重视。制定工作计划，研究投资策略，都离不开对信息的充分利用。管理信息系统（Management  Information  System,缩写MIS）是一种“人机系统”，它以特定的模式支持一个组织内各级组织机构之间的通讯，对信息资源进行综合开发，管理和利用，实现对该组织的有效管理。它通过对数据的加工处理，及时为管理与决策分析提供信息。其特点有：
 数据全部存储于计算机系统中；
 用户使用简单、操作方便、查询速度快；
 有极强的人-机对话功能；
 能直接从计算机系统中提供决策所需的参考信息。

[资料来源：THINK58.com]

    可行性分析（可行性分析）也称为可行性研究，是在系统调查的基础上，针对新系统的开发是否具备必要性和可能性，对新系统的开发从技术、经济、社会的方面进行分析和研究，以避免投资失误，保证新系统的开发成功。可行性研究的目的就是用最小的代价在尽可能短的时间内确定问题是否能够解决。
一般而言，良好的业务计费账务管理，有助于为企业达到以下的目标：一、协助组织达成发展目标与远景。二、有效地运用人员的能力与技术专才。三、促使组织成员的工作士气高昂且激发潜能。四、滿足组织成员的自我实现感与增加成员的工作成就感。五、发起且落实组织变革。六、提高组织成员的工作生活品质。七、协助企业负责人做出正确决策。
数据库是指自描述的完整记录的集合。数据库技术在20世纪60年代中期产生，它的出现使信息系统的研制从以加工数据的程序为中心转变为以共享数据库为中心来进行。数据库开始是在大公司或机构中进行大规模数据处理后来随着计算机的逐渐普及，数据库才应用到计算机上。数据库发展的到今天，已经是相当成熟的阶段，它对大量数据处理能力的不断提高，发展和完善。
根据实际情况，我们使用ADO控件少量代价快速地构造一个可执行的软件系统模型。使用户和开发人员可以较快地确定需求，然后采用循环进化的开发方式，对系统模型作连续的精化，将系统需具备的性质逐渐增加上去，直到所有的性质全部满足。此时模块也发展成为最终产品了。 think58 [版权所有：http://think58.com]
现代计算机软硬件的发展使得本系统具有良好的操作界面，简单直接的操作界面，具有较强的人机对话能力，支持多种汉字输入方式，其适应性强，显示内容简单明了，使操作者不必具有较高高的计算机专业知识，也不必进行专门培训，稍一接触就可以上手进行所有操作。
本文的研究框架如下图1.2所示，反映了如下的研究思路：
 
图1.2 本文的研究框架图
本系统采用微软公司的Visual Basic 6.0是进行前台应用程序开发，后台采用微软的SQL Sever进行后台数据库开发。Visual Basic 6.0是Windows应用程序开发工具，是使用广泛、易学易用的面向对象的开发工具。Visual Basic提供了大量的控件，这些控件可用于设计界面和实现各种功能，减少了编程人员的工作量，也简化了界面设计过程，从而有效的提高了应用程序的运行效率和可靠性。故而，实现本系统VB是一个相对较好的选择。Visual Basic 6.0是一个非常优秀的数据库应用工具完全支持面向对象的开发。它拥有多种数据库接口，可以非常方便地连接到各种数据源再加之其专利产品，程序员不需编写任何SQL语句即可轻松地查询和更新后数据库中的数据，这使当时的同类开发工具望尘莫及。
第二章 电信业务计费账务管理信息系统研究概述
2.1 管理信息系统的发展历史

本文来自think58 [资料来源：http://think58.com]

信息作为生产力中最活跃的因素，很早就在人类经济生活中发挥着不可替代的作用，但把信息纳入企业经营管理系统中高效处理和应用是在计算机发明以后的50年代末。
目前人们所提到的管理信息系统，通常是指以计算机为工具，对管理信息进行收集、存贮、检索、加工和传递，使其应用于组织机构及企业管理领域的“人－机系统”，该系统是70年代初“后工业经济”时代的产物，在企业管理信息系统在其发展的初期，是单一的人—机系统，系统功能简单，效率低，对管理的作用有限。
进入2 0世纪80年代末，随着计算机网络和通信技术的大力发展，企业管理信息系统进入网络化的发展时期。世界发达国家已建立起了完善的先进的管理信息系统体系，在其社会经济发展领域中发挥着巨大的作用。
我国的管理信息系统大发展是在80年代末90年代初，国家相继建立起了“金卡”、“金关”、金桥“工程，多数企事业单位建立了局域网和广域网管理信息系统。随着世界经济和我国经济逐步向知识经济迈进，无论是基于工业经济的管理信息系统，还是面向少数专家和管理人员的专家系统 (ES)或决策支持系统 (DSS)，其处理对象和服务对象，自身的系统结构，处理能力，都有了进一步的发展。
2.2 电信业务计费账务管理信息系统的作用

think58 [资料来源：http://think58.com]

随着电信业务计费账务管理信息系统在企业中的广泛应用，该系统对企业的影响也会越来越大，它对企业电信业务计费账务管理方面的贡献是无可替代的。
 2.2.1 能够给企业带来先进的电信业务计费账务管理思想及方法
管理的进步主要体现为管理思想和相应管理模式与方法的进步。管理软件本身是管理思想和管理模式的载体，它具有双重核心，即：管理思想、信息技术。软件是具体的，除了带给管理思想外，更多地表现为基于思想的管理模式和方法。电信业务计费账务管理软件带给企业操作方便的账务管理功能；决策支持软件使决策模型真正走到了企业。
2.2.2 促进建立现代电信业务计费账务管理模式
当前，企业管理正从实物管理走向资本管理，又走向知识管理，信息和知识成为继人力、资本之后的第三大企业资源。搞好知识管理（KM）已经成为现代企业，特别是以知识增值为主的企业的迫切课题。源于信息处理以软件为核心的IT系统在知识管理领域具有“先天”的优势。
在企业的组织结构改进方面，应用电信业务计费账务管理系统可以优化组织内部信息沟通方式，提高沟通效率，减少组织层级；可以增强每个业务的信息处理能力，提高对市场的直接反应能力，增加单个管理者的管理跨度等，从而使企业能够建立扁平结构的组织模式。

内容来自think58

[资料来源：http://think58.com]

2.2.3 促进电信业务计费账务管理正规化
管理正规化是管理通向更高层次的台阶。实现管理正规化有多条路径，软件能够有效地促进这一进程。企业电信业务计费账务管理规则、标准、程序和制度都可以在软件及其相关系统中体现出来。
更重要的是，软件对管理正规化的促进在很大程度上避免了形式主义。由于软件是一个实时应用系统，管理规范透过软件溶入了企业的业务和管理流程，较之纸质的规章和无形的规范而言，更容易被贯彻执行。
2.2.4 帮助企业提高管理时效
在现代企业社会中，时效性是一个越来越重要的要求。时效包括经营时效和管理时效。提高管理的时效性也是改进管理的重要内容。传统管理手段下，很多管理只能停留在事后延时开展，事中的实时控制和事前的预先控制困难。比如，各种管理报告只能是月报、季报和

think58好，好think58 [资料来源：http://www.THINK58.com]

[资料来源：THINK58.com]

第六章 结论
软件经过测试，运行效果良好。在处理各种财务管理工作中表现突出，方便快捷，能使电信业务计费账务管理者能够更专注于最需要智慧和经验的工作，大大节约了时间，因而提高电信业务计费账务管理的质量和效率。达到了预期的目的，即：
1、时间经济性。系统运行效率高，反映速度快。
2、可靠性。能连续准确的处理业务，有较强的容错能力。
3、可理解性。用户容易理解和使用该系统。
4、可维护性和适应性。系统应易于修改、易于扩充、易于维护，能够适应业务不断发展变化的需要。
5、可用性。目标系统功能齐全，能够完全满足业务需求。
6、安全保密性。保证系统的物理安全、数据存储和存取的安全与保密、数据传输的安全与保密，做好使用人员的授权管理。
在设计上，达到了面向对象的目的，使系统更加人性化，易于操作。
在数据库上，SQL SEVER数据库能够优秀的承担中小行数据库的运行要求，保证数据库的效率和安全性。
综合考虑整套系统，从底层数据库设计、应用平台设计，到程序的发布，都能符合软件设计规范，并且达到较优化的系统运行过程。

think58

[版权所有：http://think58.com]

       Text3.Text = rst.Fields("业务类型")
       DTPicker1.Value = rst.Fields("开户日期")
    rst.Close
End If
End Sub
Private Sub Command2_Click()
If Option2.Value = True Then   '缴费操作

内容来自think58 [资料来源：THINK58.com]

[资料来源：http://think58.com]

    If Text2 = "" Then
        MsgBox "请先输入您要缴纳的费用！", , "提示"
        Text2.SetFocus
        Exit Sub
    Else
         rst.Open "select * From 账户表 where 账户编号 ='" + Combo2.Text + "'", Cnn, adOpenKeyset, adLockOptimistic '列出账户表中的所有账户编号
            rst.Fields("剩余资金") = Val(rst.Fields("剩余资金")) + Val(Text2)
            rst.Update
        rst.Close
         MsgBox "您已经向该账户冲入'" + Text2 + "'元钱！", , "提示"
     End If
ElseIf Option3.Value = True Then
     If Combo3.Text = "" Then
         MsgBox "请先选择需要改为的业务类型！", , "提示"

think58 [来源：http://think58.com]

         Combo3.SetFocus
         Exit Sub
     Else
          rst.Open "select * From 账户表 where 账户编号 ='" + Combo2.Text + "'", Cnn, adOpenKeyset, adLockOptimistic '列出账户表中的所有账户编号
             rst.Fields("业务类型") = Combo3.Text
             rst.Update
         rst.Close
          MsgBox "您已经将该账户的业务类型改为'" + Combo3.Text + "'了！", , "提示"
    End If
ElseIf Option1.Value = True Then
    i = MsgBox("是否确定要注销该账号？", vbYesNo, "提示")
    If i = vbNo Then Exit Sub
    rst.Open "select * From 账户表 where 账户编号 ='" + Combo2.Text + "'", Cnn, adOpenKeyset, adLockOptimistic '列出账户表中的所有账户编号 think58好，好think58 [资料来源：THINK58.com]
         MsgBox "该账户中剩余的资金为'" + Str(rst.Fields("剩余资金")) + "'请妥善处理！", , "提示"
         rst.Delete
         rst.Update
     rst.Close
    MsgBox "注销成功！", , "提示"
    For i = 0 To 7
        Text1(i) = ""
     Next i
       Text3.Text = ""
Else
    MsgBox "请先选择操作业务！", , "提示"
End If
End Sub
Private Sub Command4_Click()
Unload Me
End Sub
Private Sub Form_Load()
rst.Open "select * From 业务表", Cnn, adOpenKeyset, adLockOptimistic  '列出业务表中的业务类型
    Combo3.Clear
        rst.MoveFirst
        For i = 0 To rst.RecordCount - 1
            Combo3.AddItem rst.Fields("业务类型") 内容来自think58

[版权所有：http://think58.com]

            rst.MoveNext
        Next i
rst.Close
 '‘---------------------------------
 rst.Open "select * From 账户表", Cnn, adOpenKeyset, adLockOptimistic  '列出账户表中的账户编号
    Combo2.Clear
        rst.MoveFirst
        For i = 0 To rst.RecordCount - 1
            Combo2.AddItem rst.Fields("账户编号")
            rst.MoveNext
        Next i
rst.Close
End Sub
Private Sub Frame1_DragDrop(Index As Integer, Source As Control, X As Single, Y As Single)
End Sub
Private Sub Option1_Click()
    Text2.Enabled = False
    Combo3.Enabled = False
End Sub
Private Sub Option2_Click()
    Text2.Enabled = True think58
    Combo3.Enabled = False
End Sub
Private Sub Option3_Click()
Text2.Enabled = False
Combo3.Enabled = True
End Sub 本文来自think58

第八章 结束语
在软件的编写过程中，我充分体会了软件编程工作者的辛苦，因为每一个细微的细节都必须十分的注意，如果稍有不慎，就会全盘皆输，而且往往很多的时候，程序我自己觉得非常的正确，但是就是编译通不过，在查找错误的过程中，面临着否认自己的过程，是对意志品质的考验。
我的辛勤努力有了汇报，终于做出了一个完整的软件，虽然这个软件的功能并不算得上复杂，但在实际的运用中，已经发挥了他得价值，在业务计费账务工作中，已经将我工作得努力转化为生产力。这就像是精心栽培得果实成熟时心中得感受。他毕竟代表了我四个月辛勤的结晶。
相信，有了这次得实践，我会更有信心在将来得工作中做出更大成绩。
在本系统的设计过程和论文编写过程中，很多老师、同事和朋友都给与了我许多无私的帮助，尤其是我的导师给我的论文提出了很多宝贵的修改意见，在这里，我向这些无私帮助我的人表示衷心的感谢。 本文来自think58 [资料来源：http://THINK58.com]

 

内容来自think58

[资料来源：THINK58.com]

[来源：http://www.think58.com]