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

用DELPHI制作留言板

HTML文档下载 WORD文档下载 PDF文档下载
用DELPHI制作留言板

现在很多朋友都有了自己的个人主页。有一个留言板主页与访问者交流一下可能是很多网友愿望。但留言板主页不同与一般主页,它不但有主页部分而且还要有数据存储功能。其实用DELPHI的CGI应用程序可以轻松的制作留言板主页。用ELPHI开发CGI应用程序不但可以实现ASP,HTML很难实现的低层操作,而且简化了CGI应用程序开发过程。

1.选择Delphi的菜单File|New,在New标签中选择“Web Server Application”。

然后在选择“CGI Stand-alone executable",创建一个CGI应用程序。

(如果想创建ISAPI或NSAPI应用程序,只需选择“ISAPI/NSAPI Dynamic Link Library”,后几步操作不变。)

2.系统自动创建一个非可视的WebModule1组件,我们按以下步骤给程序添加控制和代码:

(1)、双击WebModule1的Actions属性,弹出“Editing WebModule1.Actions”对话框;

(2)、单击Add按钮,添加一个新行WebActionItem1

(3)、单击WebActionItem1,在Object Inspector中将WebActionItem1的Default属性设置为True;这样设置使访问CGI.EXE时直接访问此页面。

(4)、单击Add按钮,添加一个新行WebActionItem2

(5)、单击WebActionItem2,在Object Inspector中将WebActionItem2的PathInfo属性设置为“\Info”;即访问此页面的路径为CGI.EXE\Info。

(6)、在Object Inspector中双击WebActionItem1的OnAction事件,添加代码。将留言板页面的HTML语句赋给Response.Content属性,使用户访问WEB服务器应用程序时显示。

(7)、在Object Inspector中双击WebActionItem2的OnAction事件,添加代码处理留言板页面传回的信息,同时显示相关信息通知用户。其中涉及Request.ContentFields.Values['index']及Request.ContentFields.Strings[counts]两个属性的应用。

Request.ContentFields.Values['UserName']是指留言板页面中name="UserName"的控件中的数据信息。

Request.ContentFields.Strings[Counts]是指留言板页面传过来各项数据及对应的控件名。以Counts区分其为哪项数据,其数值为留言板页面传输数据项的顺序号。

数据存储方式我采用文本文件存储,如果网友的主页人气鼎盛也可考虑改用数据库存储。

以下是完整的程序代码

在DELPHI3,IIS4.0/PWS,IE4.0中运行通过。

全球开发者报告:Windows Phone已死,Windows 10长存 苹果官方博客:从SDK详说Swift代码的改变 Espresso实战:快速的Android UI自动化测试 《Java并发编程的艺术》作者方腾飞:感谢Java,带我一路前行! Crystal:一个类似于Ruby语法的编程语言 谁将是传统密码的终结者 专访民生银行:CPOS平台如何从线下布局移动支付 MathWorks程邺:机器人时代未来已来 Swift编程规范:保持代码优美的10个方法 中国第二届CSS开发者大会视频&PPT全部免费观看 如何基于Vert.x实现远程调用? Go 1.5如期发布,完全告别C代码 Rust一周集锦(三):关闭3个RFC并为1.4版本做准备 【CTO讲堂】多备份创始人陈元强:在线灾备革命背后的事 探索React:组件间通信过程解析 机智云完成2亿元B轮融资 将围绕信息安全与机器学习创建“机智云联合实验室” 【CTO讲堂】深度?广度?浅析技术人员的职业发展之路 详解React Flux架构工作方式 专访Tiny框架创始人悠然:好的软件设计是“品”出来的 开发移动应用的7大设计要点 历时一年半 现代Web框架Phoenix 1.0正式发布 【七问七答】对话Erlang核心成员Eric Merritt 分布式文档数据库MongoDB开发版本3.1.7发布 年末巨献!SDCC 2015中国软件开发者嘉年华全面开启 Qualcomm中国2015高峰论坛:新品牌与5G技术展望 福利!MDCC 2015 免费展位等你来申请! 《近匠》Gamegou:多些坚持,瞄准海外的小团队也有春天 细说JavaScript异步函数发展历程 YoMail创始人Albert Yang:我与Email交织的程序人生 TIOBE 2015年9月编程语言排行榜:时髦语言Rust进前50 50张999元限量特惠票!SDCC2015软件开发嘉年华 首批讲师名单公布 女大学生的一天(转载) 200分问一个小问题, 在线等: JBuilder自带的ESite for weblogic部署出错... 请问 vb 怎么样让函数返回一个二维数组?能给你例子吗? 有人知道上海通方信息系统有限公司吗?我要去面式了?大家帮帮忙,做ejb程序员。 域问题 转分 介绍制作DLL专业书籍 有关image的函数问题 请教? TObject和integer之间的转换问题 数据库简单问题 文本文件的最后一行怎末去掉换行符,用程序实现。 善良的程序员,当心QQ骗子啊! 谁有Qamonitor,小弟急用! 不要笑偶 转分 有会打印对象编程的吗?printer对象怎样打印横线??怎样打印带风格的报表?? 表分区的数量有上限吗 ASP 0178 (0x80070005) 各位高人,请一定帮个忙吧 !! SetCellImage 利用C# 读取系统当前进程的出现问题,帮忙!! 请教高手:怎样在一个窗口里能够输入文本文件(按回车键) 另一个窗口显示出同样的文本 高手在何方 (大力请进)sql字符串处理的问题 上哪能下到exchange 2000,下到马上给分! ado问题? 数据迁移问题??? 怎么把列名选出来? [在线求助]:有什么好的方法可以使得鼠标放上有链接的地方状态栏不显示真实地址? 高手在哪!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 各位大哥﹐何為微创软件开发管理﹖﹖﹖﹖ 3com switch 3300 xm 有网管的功能吗? 关于窗口大小的问题,快来捡分~~~ 为什么2001年前的提问的问题、得分的问题、信誉分变化纪录都不见了。 无法在人才频道上提交简历。。。 请问:wsad4支持滚轮鼠标的插件哪里有下载??? 自动锁定计算机? 请问如何终止一个正在运行的应用程序 无法在人才频道上提交简历。。。 后面数据库为ms sql server2000的时间问题? DoEvents 怎么用?(不好意思,只有这么多分了!) CSDN真让我失望,大家都喜欢回答无聊的问题(不要回复) jdbc中LIKE条件如何使用prepareStatement? 请问,如果想报考系分的话,需要先过高程吗? 请问怎么把Excel形式的表结构导入到Oracle … 请问数据窗口中如何自动记录资料修改的帐户? 我倒要看看谁有本事让javac输出这样的信息? ADSL 可以直联吗? linfeng1216 (林枫) 请来领分。 在java中的暴露事件如何处理? 求问皇帝的新装中骇人听闻的潜台词是什么 求止战之殇的伴奏 一下事件按什么顺序排列更符合逻辑?53.(1)众人称赞(2)被捕入狱(3)痛改韵非 (4)人室盗窃(5)刑满释放A.4—2—3—5—1 B.2—4—3—5—1C.2—4—5—3—1 D.4—2—5—3一l 止战之殇是什么意思? 几个句子的发音困难!我在练口语,模仿磁带时就是听不出that怎么读,例如,It was generally supposed that it would not happen again.It is expected that the weather will be good soon.还有,We couldn't afford to keep our car,so we 甲队和乙队共修一条公路,甲队修了全长的百分之60,比乙队多修60米,这条公路长多少米? 《皇帝的新装》“这可骇人听闻了”,此句中的“这”字指代什么? 什么是特征音程? 初中七年级信息技术开学的第一节课要怎么上~ 在《皇帝的新装》中“这可骇人听闻了”的“这”是什么意思?初一上册26课! 甲乙丙修一条公路,路程比是8比7比5,他们按所修路程派劳动力,丙没派,但需付1350元,这样甲派60人,乙接上文:40人,甲乙各分多少元 已知函数f(x)=x^3-x在(0,a]上递减,在[a,+∞)上递增,求a的取值范围. 谁能解释一下止战之殇这首歌 音程解决5 升1怎么解决?不是应该向外解决吗?是5 3还是3 3还是别的? 七年级学生入学要做到哪些? 英文翻译,冯友兰的《中国哲学简史》里的一句话The first to do so was Ssu-ma T'an (died HO B.C.), father of Ssu-ma Ch'ien (I45~ca. 86 B.C.), and the author with him of China's first great dynastic history, the Shih Chi or 甲乙丙三村合修路三村修路比8:7:5三村按修路派劳动丙没派劳动付甲乙1350元甲派60人乙40人甲乙各分多少元 已知函数f(x)=x^2(x-a)在区间(0,2/3)内单调递减求a的取值范围 现在还有大公无私的人吗? 甲乙丙三村修路程比是8:7:5因丙村无法派出劳动力,需要给甲乙两村1350元这样甲派了60人,乙派了40人,求甲乙两村各应分多少元? 香港割让后的情景有没有一本书,或是电影,描写一百多年前香港刚刚被割让给英国时,香港民众的反应或是当时的情景的?比如说英国是怎样对待当时的香港民众的,或是香港的生活状况 人是大公无私的吗? 音程是什么? 割让香港岛给香港带来的影响 反犬旁加贪是什么字, 数学题面积计算-小学题数学题面积计算 一个面积为70平方米的空间,使用一种280*80cm(厘米)面积的地砖铺设!请问有使用多少块呢? 音程的表现 意义 世界上垂直起跳最高是谁谢谢 鸿门宴中的 扬子江的介绍是什么, 世界上垂直起跳高度最高是多少?拜托各位了 3Q 哎 那我想问的是2013年全国大学生英语竞赛初赛的笔试是 包括单选,阅读理解,完形等等和平常一样吗 什么的扬子江 世界上垂直起跳最高距离是多少?人们再不断创造新的高度 鸿门宴中的问题刘邦亲赴鸿门宴的主要原因是什么?显示刘邦什么养的性格特点?鸿门宴上活跃着很多人,请概括分析一下作者是怎样表现这些人物的?效果怎样? 止战之殇描述的是什么? 请你举一例,说说某一化学产品的利与弊.越快越好、亲们 精英聚集的地方 用英语怎么说我要做一张关于培训的海报.需要加上这个短语的英文.不要百度翻译.求最地道的说法 求歌曲 女的唱的 非摇滚 歌词里边有you hope to find me i'm sorry but i can help you求歌曲 女的唱的 非摇滚 歌词里边有you hope to find me i'm sorry but i can help you 太阳直射南纬20度,昼长达到一年中的最大值的范围是多少? 鸿门宴 . 数学面积计算在下图中,平行四边形ABCD的边长BC长10cm,直角三角形ECB的直角边EC长8cm,已知阴影部分的总面积比三角形的面积大10平方厘米,求平行四边形ABCD的面积.对不起!是比三角形EFG的面积 当太阳直射20N时,20N地区昼长达一年最大值? 关于赞美大公无私精神的人的古诗 张家港扬子江石化有限公司,简称“扬子江石化”这个单位怎么样?如题:张家港扬子江石化有限公司,简称“扬子江石化”这个单位怎么样,待遇情况,越详细越好,要我下周去面试,应聘的是中控 太阳直射南半球,南半球各地昼长于夜,其中什么日夜长达到一年中的最大值太阳直射北半球,北半球各地昼长于夜,其中什么日夜长达到一年中的最大值,一共两个问. "中国国际女排精英赛"译成英文怎么说? 直译 修一条路甲修了全长的4分之1,正好修120米,乙修了百分之35圆形花坛的半径是8米,如果延花坛的边沿修2米的小路,小路面积是多少 独一无二的反义词是什么 周杰伦的{止战之殇}是什么意思啊 历史上跟祁黄羊一样大公无私的有哪些人 独一无二的反义词是什么啊 一个言字旁一个沈的右半边读什么 历史上大公无私的人被称为什么 独一无二的反义词是什么? 求三个数学小故事!急只要三个,不许多,不许少 大公无私的人有哪些? 独一无二的反义词?1.独一无二的反义词2.填字成词.心悦( )( ) 久负( )( ) 故交通之利,不若扬子江与珠江也.意思快噢~ 巴塔头目被无人机击毙阿根廷:监狱财政吃紧 多人“捡漏”越外交部长王毅夫人主持扶贫义卖 筹30周边国家潜艇大扫描:日本威胁最大 印杭宁高速路车子爆炸 司机一家死里逃生男子开车手套厚得有点夸张 原是手伤无美机场枪击案导致1死7伤 疑犯称对政温州司机撞伤了姑娘一根手指 误工费索驾驶室人1个变3个 交警找出车祸肇事男人偷偷找小三 原配二奶联手起诉丈夫斯诺登将在俄“遥助”德国 作证“监听2013年是“男”还是“女”?哈里王子遭英国报刊窃听房租过高 白领伦敦上班巴塞罗那居住坐温州16家企业3500万元建起污水处浙江290多家企事业单位赴沪求贤70杭州建兰中学千岛湖建新校 2014年美一涂鸦街区将拆迁 艺术家联名告开发媒体揭秘美国监听手段:大使馆屋顶材料美无人机操作员:像僵尸一样执行任务 “罗莎”向偏西方向移动 东部地区雾霾扶绥:12年“爱心接力棒”助女孩圆梦合肥空气质量告别末位排名 位居安徽第3月24日:你我共同参与 依法防控结雪龙号恰在珀斯等待补给 开到碎片海域复查整改不合格的撤销称号安徽省食品药品监管局调研组到凤台调研梁衡做客安徽省直机关大讲堂畅谈“读书隆林清查涉“黄赌毒”场所中国驻孟加拉国大使发表文章 倡议开展中国驻澳使馆启动应急机制 跟踪失联客荷兰男子通过性行为向女性捐精 12年习主席欧洲之行将开启中欧关系的新篇章香港充公象牙两年内销毁台湾学生占领立法院 江宜桦驳斥谣言与被指白天挺反服贸晚上讽学生爱玩 “鸡美海军称美P 8飞机雷达发现与马航失湖南:16岁男生在校门口遭人开枪射穿曝前切尔西妖锋出演男一号 导演:镜头疑似碎片所在海域水深约3000米 打台报:台湾少数始终不服多数 服贸协议王家瑞会见蒙古人民党代表团
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘