写的一个简陋的视频播放页源代码

一个简陋的视频播放页源代码，简单的一个例子调用ckplayer实现在线播放资源全部外链就行。

软件名称：ckplayer
版本：X1
请将ckplayer放在网站环境中运行
' 模板数据.置值 (“视频地址”, 窗口1.编辑框1.内容)
' 响应.写出文本 (“你好易语言”)
' // TODO: 业务处理逻辑

a ＝ 打开文件 (取运行目录 () ＋ “\视频.txt”, 1, )
局_视频信息数组 ＝ 分割文本 (读入文本 (a, 取文件长度 (a)), #换行符, )
关闭文件 (a)
.计次循环首 (取数组成员数 (局_视频信息数组), i)
.如果真 (局_视频信息数组 [i] ＝ “”)
到循环尾 ()
.如果真结束
局_临时数组 ＝ 分割文本 (局_视频信息数组 [i], “ ”, )
.如果真 (取数组成员数 (局_临时数组) ≠ 3)
到循环尾 ()
.如果真结束
局_视频信息.标题 ＝ 局_临时数组 [1]
局_视频信息.图片 ＝ 局_临时数组 [2]
局_视频信息.地址 ＝ 局_临时数组 [3]
加入成员 (全_视频信息, 局_视频信息)
.计次循环尾 ()