说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

怎样在Paradox表中加密码?-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
怎样在Paradox表中加密码?-Delphi资料

在 Database Desktop 中打开要加密的 Paradox 表,点 Restructure 按钮

打开表结构设计对话框,然后在 Table Properties 里选 Password Security

按 Defind 按钮 就可以设置密码了。以后打开这个表时都会要求输入密码。

动态的添加PARADOX表的方法

下面给出的函数 AddMasterPassword 完成添加PARADOX表

主口令的工作

AddMasterPassword(Table1

'MyNewPassword')

procedure AddMasterPassword(Table: TTable; pswd: string);

const

RESTRUCTURE_TRUE = WordBool(1);

var

TblDesc: CRTblDesc;

hDb: hDBIDb;

begin

{表打开?表是独占吗?}

if (Table.Active = False) or (Table.Exclusive = False) then

raise EDatabaseError.Create('数据表必须在独占方式才可以添加口令');

{初始化表描述区 }

FillChar(TblDesc

SizeOf(CRTblDesc)

0);

with TblDesc do

begin

{ 把表名放到描述区 }

StrPCopy(szTblName

Table.TableName);

{ 把表类型放到描述区 }

StrCopy(szTblType

szPARADOX);

StrPCopy(szPassword

pswd);

{ 设置BPROTECTED为TRUE }

bProtected := RESTRUCTURE_TRUE;

end;

{ 从当前的HANDLE里得到DATABASE的HANDLE }

Check(DbiGetObjFromObj(hDBIObj(Table.Handle)

objDATABASE

hDBIObj(hDb)));

{ 关闭表 }

Table.Close;

{ 添加主口令到PARADOX表里}

Check(DbiDoRestructure(hDb

1

@TblDesc

nil

nil

nil

FALSE));

{添加一个新口令到SESSION}

Session.AddPassword(pswd);

{重新打开表 }

Table.Open;

end;

添加副口令的办法与此类似

2014Unity亚洲开发者大会倒计时 干货内容日程汇总 TIOBE 2014年4月编程语言排行榜:Perl跌至历史最低点 Hadoop集群环境下网络架构的设计与优化 CloudFoundry架构优化:NATS集群化方案 Dropbox推独立应用,公司估值已达100亿美元 【走近院士】梅宏:云计算时代软件技术发展需求和挑战 云计算战争:OpenStack vs. VMware Cortana与Siri、Google Now的较量:支持功能更多 代码面试最常用的10大算法 “颠覆医疗” 时云医疗推三款硬件产品 华为章宇:如何学习开源项目及Ceph的浅析 EMC:大数据时代中对于数据保护的重新定义 Google Glass于4月15日在美对外开放购买,售价为1500美元 电脑上的网址怎么样复制到手机 创客天下——《Make》及Maker Faire创办人、O'Reilly Media创始人Dale Dougherty专访 《近匠》aGlass团队:透析眼控技术的价值 一周消息树:超级充电器来袭,30秒可为手机充满电 北森CTO张庆化:利用Spark实现数据驱动价值 大公网冯咀志:站内搜索系统的PowerLinux迁移实践 2014移动开发者必备的十大应用测试工具 前《连线》主编Chris Anderson:创客就要DIT UC多屏战略 推出电脑版和电视版浏览器 “全国云计算大数据创新项目评选”征集活动正式启动 【走近院士】李伯虎:云制造技术的应用及发展 一周热点: Twitter的下一代分布式数据库Manhattan 专访微软陆奇:大转型中最难的是文化的改变 【CTO俱乐部走进腾讯】问题征集进行中 颠覆移动营销世界的女王Yunha Kim为女性CEO正名 Google揭露“仙女座”虚拟网络,及分散和集中架构之辩 DHTMLX Touch:开源的HTML5和JavaScript框架 Supercell下一城:《海岛奇兵》续写芬兰手游传奇 请大家发表一下自己的意见 问一个消息? 欢迎参加微软新闻组 & Diyinside Windows User Group离线技术沙龙 求助:chart使用Lineseries颜色问题 ?在C#的如何运用线程 关于安装Websphere Portal的问题。希望大家帮我解决一下。 非法字符的问题 转让一优派PT813 21寸显示器(适合专业作图) 北京 一个小问题,还请多帮忙!谢谢!! 怎么用命令看到一个进程的内存数? 用VC怎样获知当前Window是否支持某国语言(如中文)? 投诉: 有关通用查询组件—— 视图选择公式的问题,请帮帮我! 请教一小问题? DataSet.AcceptChanges()这个有什么用呀??? 欢迎参加微软新闻组 & Diyinside Windows User Group离线技术沙龙 ?怎样在ASPX的WEB服务中运用C#的线程 在2003下用Interdev 串口通信的问题 紧急50分 在 vb.net 中,如何读取 xml 文件? 斑竹地进来! 欢迎参加微软新闻组 & Diyinside Windows User Group离线技术沙龙 新装的WIN2000,关了启动程序,占内存近100M,还老出怪问题 连编以后,出现的错误,求解 我有一个外来控件(条形码),请问该如何用代码在图片框中动态添加一控件?? 系统设计师就要开考了,请考过高程和就要考高程全部看过来~~~~ 欢迎参加微软新闻组 & Diyinside Windows User Group离线技术沙龙 如何把一组CLASS文件打成一个JAR的包 谁用过solid数据库阿,可知里面怎莫用视图阿??紧急! 求求大哥们了 怎样动态改变控件的属性? 明天要去九城面试,有知道内情的吗,给说说,无限感激,, 大家帮忙看看!我有记个问题一直困扰我!(送分的问题(可以加100分啊),不够可加啊!都是送分题,来者都有分) 欢迎参加微软新闻组 & Diyinside Windows User Group离线技术沙龙 如何处理让播放器播放多首歌 【请教】vc适合oo开发? Window中的大/小字体显示属性改变后,影响对话框大小的问题(VC)? 如何处理让播放器播放多首歌 如何同时使用两个msn 欢迎参加微软新闻组 & Diyinside Windows User Group离线技术沙龙 在线等待大虾求助:win2000缠人问题 求ASP下进度条源码!多谢了! ———请帮忙----! 如何用sql语句将文本文件转换成sql数据库 用什么开发工具最好 急急急!急急急!accept 后如何获取Client端socket的源IP地址字符串???? 欢迎参加微软新闻组 & Diyinside Windows User Group离线技术沙龙 Jbuilder9加载了db2驱动却不能使用 高分请教!!!关于访问数据库的用的DataSet对象的 blackout period是什么意思 不客气用英文咋说 不客气英文是? 都不客气地取食取食改成现在常用的词 lesson和class的区别1“李先生是一位英语老师,他的英语课很有趣.”翻译这句话,这里的课应该用classes还是lessons?2.class与lesson区别 中国之最有哪些?不要太多!20—30条!就今天!见天是10月6日 vedio 用 where 还是 which?Part two is a short monologue __ the candidates must talk about a familiar topic.------------------------------------------------A. whichB. where如上题,一直搞不懂 which 和 where 的区别, 该选哪个呢?希望讲解 系统是这个样子,我用DM割了一次,装好系统,搬到家里就有出现NILDR IS Missing这样了,而且一键还原也不能用了,我用mhdd检测着,是不是硬盘不行了, 世界历史上有哪些之最淮南历史书上的,就是北师大版的.谢谢 关于which They have invited me to dinner _ is very kind of them.根据答案空格里是 which 这是什么句子和成分那that 6名少女统一着装离家出走 称无人理解滨江一学校体育馆“一馆两用” 学生市媒体称上海自贸区资本项目开放或实行“13岁儿子黑网吧内打游戏 母亲连找四安徽病重孕妇遭多家医院拒收 为省钱只美数千民众参加枕头大战 欲破吉尼斯世加油站职员遭抢劫 胸前手机挡子弹救其有研究称所有哺乳动物遵循21秒排尿定埃及武打冠军因支持前总统穆尔西 金牌世上真有“摇钱树”:桉树能测地下黄金美国安局铁杆盟友临阵“倒戈” 称反对李克勤容祖儿齐唱《东方之珠》炎炎夏日,带你体验不一young的水轩尼诗 摩登龙船饭Numbers 数字苏宁收购国米深化国际化战略 传承百年中央“三公”经费支出比预算减少9.42016广东体育博览会9月举行新兴来穗“吆喝”旅游资源带你体验不一Young的水世界 炎炎美陈峰会 共聊创意和未来“保安硕士”与“硕士保安”至尊战神医路仙途网游之暴医角色球员之王西决衰商修神之至尊之路清朝求生记幻世悠游邪影本纪穹游记普兰店旅游元阳旅游于都旅游木里旅游椒江旅游关岭旅游遵化旅游轮台旅游万盛旅游徐福村旅游陇川旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘