美妙婚姻，论坛体验
技术与开发
金九银十，是结婚的好日子。刚刚成年的风也准备在这个时候结婚，不过不是在现实中，而是在网络中虚拟结婚。这个功能很受年轻人的喜欢，不甘落伍的风也准备和相识很久的网友在论坛来次虚拟结婚。
如果论坛中有结婚的功能，会非常讨年轻人的喜欢，会大大增加论坛的活跃度，增加网站的访问量（结婚插件可以到http://www.shudoo.com/bzsoft下载）。要结婚，当然要从求婚开始啦！我们先要允许网友提交自己的求婚信息并形成求婚列表。
然后要设计结婚礼堂、论坛公告以及网友祝福功能，最后在原有的个人信息基础上增加结婚信息，这样便完成了结婚插件的设计。根据结婚插件的相似原理，我们还可以设计离婚插件、兄弟插件等。
小知识：如何提高使用Request的效率呢？访问Request集合提取一个值是费时的，会大量占用资源。因为这个操作包含了一系列对相关集合的搜索，这比访问一个局部变量要慢得多。因此，如果打算在页面中多次使用Request集合中的一个值，应该考虑将它存储为一个局部变量。
第一步 集合求婚信息
首先我们需要在数据库中建立一张求婚信息登记表，当网友通过求婚页面提交相关求婚信息后，该信息就会被存入到求婚信息登记表中，为了让被求婚的网友及时收到求婚信息，我们还需要将求婚信息存入论坛的短信数据库表中，当该网友登录论坛的时候，便可以收到论坛的求婚短信了。
然后我们要新建求婚信息列表，网友可以通过点击列表上的求婚标题，进入求婚页面查看求婚的具体内容，而当被求婚者进入页面的时候，她（他）便可以拥有拒绝或者同意求婚的权利。通过求婚页面和短信告诉网友求婚成功与否。
在Access数据库中新建一张求婚信息登记表，再新建三张ASP页面，分别用于制作求婚信息提交页面、求婚信息列表页面以及求婚具体内容显示页面。分别在各张ASP页面内输入相关代码实现该功能，其中关键代码如下所示（完整代码下载地址：http://www.shudoo.com/bzsoft）：
SendMsg=SendMsg+"〈br〉"+"〈li〉你的金币太少或者你没有足够的金币.."
rsm.close
set rsm=nothing
set sqlm=nothing
exit sub
elseif rsm（"marry"）=0 then
SendMsg=SendMsg+"〈br〉"+"〈li〉对方已经向别人求婚了或者有人向对方求婚了，请等待！"
'婚外恋判断结束
liwugoded=clng（liwugod）
UpdateUserMoney Dvbbs.membername，-liwugoded
UpdateUserMoney toname，liwugoded
'向被求婚者发送求婚信息，读者可自行修改
sqlm="insert into dv_message（sender，incept，title，content，sendtime，issend）values（'婚姻事务处'，'"&toname&"'，'很高兴地通知您：'，'"&Dvbbs.membername&"向您求婚。礼物为"&liwugod&"金币。"&chr（10）&"请到[URL=plus_marry_List.asp？action=marryq]事务处[/URL]选择是否接受。'，'"&now（）&"'，'1'）"
Dvbbs.execute sqlm
UPDATE_User_Msg toname
第二步 设计结婚功能
当网友求婚成功后，便可以结婚了。我们要为新人设计结婚礼堂，该礼堂只允许求婚成功并且缴纳了一定虚拟货币的网友进入，我们通过读取求婚信息表中的相关信息来判断求婚成功与否，再读取论坛用户表中的金钱信息来判断虚拟货币是否足够支付进入结婚礼堂举办婚礼，当以上条件都满足的时候，便可以为双方举行婚礼。
新建一个结婚信息表，用于记录网友上传的结婚照、结婚誓言、结婚时间等信息，并将这些信息通过公告的方式发布到论坛中，网友们通过公告可以进入礼堂为新人们赠送礼金（论坛虚拟货币）或发表祝福。
在Access数据库中新建一张结婚信息表，新建一张ASP页面，用于制作结婚礼堂。输入相关代码实现该功能，其中关键代码如下所示（完整代码下载地址：http://www.shudoo.com/bzsoft）：
Call main（）'结婚礼堂相关功能集合
response.write "〈Br〉〈/td〉〈tr〉〈/table〉〈/div〉"
End if
Dvbbs.footer（）
Sub main（）
Select Case request（"action"）
case "list"
call list（）'显示结婚礼堂
case "marryliwusend"
call marryliwusend（）'结婚送礼
case "marryliwusave"
call marryliwusave（）
Send_Msg（）
case "marryliwusee"
call marryliwusee（）'结婚礼物查看
第三步 将结婚信息显示在个人信息中
最后一步，我们将网友的配偶名字以及结婚日期显示在他（她）的个人信息里，以表明他们现在已结婚的身份。修改 dispuser.asp文件，加入以下代码：
〈！——#include file="plus_marry_show.asp"——〉
dim love
love=islove（username）
TempPart1=Replace（TempPart1，"{$userlove}"，love）
以上代码用于读取结婚信息，进入后台分页面模板（page_dispuser）界面风格管理template.html（1），加入代码：
〈td class=tablebody2 align=right valign=top〉婚恋状况〈/td〉
〈td class=tablebody2〉{$userlove}〈/td〉
编后
本文中的结婚插件完成了从求婚到结婚的基本功能，但并不是十全十美。有兴趣的读者可以进一步添加更多的功能，如互赠戒指、发放红包等。当然，我们也可以将恋爱、婚姻生活、离婚等相关步骤设计到插件里。