有关于VB的问题 - VB / 数据库(包含打印,安装,报表)
我要做一个进销存的软件 但是 第一个难题是怎么设置权限呢 比如超级管理员进入的话就可以进行所有操作但是普通管理
员进去的话 只能进行一些小操作 他操作的话就会提醒他 您无权操作这 个 怎么实现呢
数据库中的人员管理表加个标志位,如“1”表示超级管理员,“0”表示普通管理员等,然后在程序中进行判断区分功能。
设置一个全局+1楼的。
用一个用户表和功能表就可以实现了。
if 用户="超级用户" then
窗体或菜单.Enabled=true
else 用户="普通用户" then
部分窗体或菜单.Enabled=false
enidf
建立用户权限加密表,在程序中根据权限给于不同的操作功能。
相关问答:
在vb中如何读取Word内容(包含表格,图片,等)
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
我想把word另存为xml之后,用vb读取这个xml的内容,请问如何实现?
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
数据库里有一个字段的内容是二进制,怎么才能把这个二进制读出来
使用字节流对象可以实现
例如现在数据库里有个字段的内容是0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......
怎么把已知的数据保存成xml文件,现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
dim a as string,b as string,c as string
a="工程编号,单位工程名称,分部工程编号"
b="单位工程名称"
c="单位"
怎么才能判断出a字符串中存在b字符串,而不存在c字符串
看看i ......