[原创]仿D4“从哪里知道 Discuz!”功能

名称：仿D4“从哪里知道 Discuz!”功能
作者：魔焰男孩
[QUOTE]
演示：http://lhsq.008.net
用户名：discuz
密码：discuz

涉及程序文件：memcp.php
涉及模板文件：memcp_profile.htm、viewpro.htm
升级数据库：有
[/QUOTE]

第一步：升级数据库

1. 
   
2. ALTER TABLE cdb_members ADD whereknow Varchar(255);
   

复制代码

请把cdb改成自己的表前缀。

第二步：修改memcp.php
查找：

1. 
   
2. $cstatusadd   = $allowcstatus ? ", customstatus='".cutstr(censor(dhtmlspecialchars($cstatusnew)), 28)."'" : '';
   

复制代码

在下面添加：

1. 
   
2. $whereknow = htmlspecialchars($whereknow);
   

复制代码

再找：

1. 
   
2. $avataradd
   

复制代码

在它前面（是前面，不是上面）添加：

1. 
   
2. whereknow='$whereknow'
   

复制代码

第三步：修改模板文件
打开memcp_profile.htm，查找：

1. 
   
2. <td bgcolor="{ALTBG2}"><input type="text" name="answernew" size="25"> {lang memcp_profile_security_answer_comment}</td>
   
3. </tr>
   

复制代码

在下面添加：

1. 
   
2. <tr>
   
3. <td bgcolor="{ALTBG1}">从哪里知道 Discuz!:<br>
   
4. <span class="smalltxt">您从哪里知道 Discuz! 论坛?</span>
   
5. </td>
   
6. <td bgcolor="{ALTBG2}">
   
7. <select name="whereknow">
   
8. <option value="">- 请选择 -</option>
   
9. <option value="朋友推荐">朋友推荐</option>
   
10. <option value="网站连接">网站链接</option>
    
11. <option value="杂志/新闻">杂志/新闻</option>
    
12. <option value="误闯进来">误闯进来</option>
    
13. </select>
    
14. </td>
    
15. </tr>
    

复制代码

（上面的文字可跟实际情况修改）
打开viewpro.htm文件，查找：

1. 
   
2. <tr><td width="45%" class="bold" valign="top">{lang bio}:</td><td width="55%" >$member[bio]</td></tr>
   

复制代码

在下面添加：

1. 
   
2. <tr><td width="45%" class="bold">从哪里知道 Discuz!:</td><td width="55%">$member[whereknow]</td></tr>
   

复制代码

完成，上传文件。

[ 本帖最后由 魔焰男孩 于 2005-8-17 12:53 编辑 ]

~占位~

作用好象不大,
不过还是支持分享

多谢了！
很不错的

严重支持!!!

原帖由 freddy 于 2005-8-17 12:45 发表
严重支持!!!

非常严重地支持~

异常严重的支持！好东西！

非常异常严重的支持，收下了~

Powered by Discuz! 4.0.1RC1 Build 050801 &copy; 2005-2009 Comsenz Technology Ltd.
Processed in 0.108740 second(s), 12 queries, Gzip enabled

防不到的。D4的有后台开关的