开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 2795|回复: 5
收起左侧

[易语言纯源码] MSCMS视频网站 魅思CMSV10 数据库入库方法 与数据字段参考

[复制链接]
结帖率:0% (0/3)
发表于 2021-2-16 21:29:15 | 显示全部楼层 |阅读模式   江西省宜春市
分享源码
界面截图:
是否带模块: -
备注说明: -
魅思是个付费视频网站系统,这个是18年写的代码,应该是V10的版本,具体我不记得了,比较久没用到了,所以开源下,给需要的人。如果版本有差异,自己修复下就行了



  
子程序名返回值类型公开备 注
mscms_入库  
参数名类 型参考可空数组备 注
标题内容文本型
图片内容文本型
在线链接文本型
下载链接文本型
分类ID文本型
播放时间文本型
变量名类 型静态数组备 注
mysql句柄整数型 
video主表名文本型 
video数据表文本型 
URL文本型 
现行时间戳文本型 
记录集句柄整数型 
ID文本型 
条件语句文本型 
增加是否成功逻辑型 
video分类信息表文本型 
分类数量整数型 
网站域名 = “xx.com”
video主表名 = “ms_video”
video数据表 = “ms_video_data”
video分类信息表 = “ms_category”
' mysql账户 = “root”
' mysql端口 = 3306
' mysql链接地址 = “192.154.105.11”
' mysql数据库名 = “msvod_v9”
' mysql密码 = “”
如果真 (播放时间 = “”)
播放时间 = “99:99”
现行时间戳 = 时间_取现行时间戳 ()
如果真 (分类ID = “”)
分类ID = “13”
mysql句柄 = 连接MySql (mysql链接地址, mysql账户, mysql密码, mysql数据库名, 到整数 (mysql端口))
执行SQL语句 (mysql句柄, “set names GBK”)
条件语句 = “title='” + 标题内容 + “'”
' 更新主表
记录集句柄 = 查找记录 (mysql句柄, video主表名, “*”, 条件语句, “id DESC”)
如果 (取记录集行数 (记录集句柄) > 0)
增加是否成功 = 假
增加是否成功 = 增加记录 (mysql句柄, video主表名, “title='” + 标题内容 + “',thumb='” + 图片内容 + “',catid='” + 分类ID + “',status='99',sysadd='1',username='AGV883',inputtime='” + 现行时间戳 + “',updatetime='” + 现行时间戳 + “',posids='0',typeid='0',listorder='0'”)
输出调试文本 (增加是否成功, “提示信息”)
记录集句柄 = 查找记录 (mysql句柄, video主表名, “*”, “title='” + 标题内容 + “'”, “id DESC”)
读字段值 (记录集句柄, “id”, ID)
URL = 网站域名 + “/index.php?m=content&c=index&a=show&catid=” + 分类ID + “&id=” + ID
更新记录 (mysql句柄, video主表名, “url='” + URL + “'”, 条件语句)

' 更新数据表与分类表
如果真 (增加是否成功)
增加记录 (mysql句柄, video数据表, “id='” + ID + “',readpoint='0',groupids_view='2,4,5,8',paginationtype='0',maxcharperpage='0',paytype='1',allow_comment='1',vdieo_url='” + 在线链接 + “',down_url='” + 下载链接 + “',playtime='” + 播放时间 + “',play='2',ud='0',down='0'”)
记录集句柄 = 查找记录 (mysql句柄, video分类信息表, “*”, “catid='” + 分类ID + “'”, “catid DESC”)
读字段值 (记录集句柄, “items”, 分类数量)
更新记录 (mysql句柄, video分类信息表, “items='”到文本 (分类数量 + 1)“'”, “catid='” + 分类ID + “'”)
输出调试文本 (分类数量)
释放记录集 (记录集句柄)
断开MySql (mysql句柄)


i支持库列表   支持库注释   
mysqlMySql支持库


结帖率:0% (0/1)
发表于 2021-2-17 23:24:57 | 显示全部楼层   河北省保定市
888888888888888888888888888888
回复 支持 反对

使用道具 举报

结帖率:96% (24/25)

签到天数: 1 天

发表于 2021-2-17 12:01:16 | 显示全部楼层   保留地址
回复 支持 反对

使用道具 举报

签到天数: 19 天

发表于 2021-2-17 00:45:16 | 显示全部楼层   浙江省绍兴市
谢谢大佬分享 支持支持
回复 支持 反对

使用道具 举报

结帖率:75% (3/4)
发表于 2021-2-16 23:31:41 | 显示全部楼层   广东省东莞市
有什么视频的啊
回复 支持 反对

使用道具 举报

结帖率:75% (3/4)
发表于 2021-2-16 23:31:07 | 显示全部楼层   广东省东莞市
票房数据的吗
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:wp@125.la
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表