精易论坛

标题: 最简单mysql账号记录纯源码【无聊写着玩的】 [打印本页]

作者: 13434230728    时间: 2023-1-5 23:19
标题: 最简单mysql账号记录纯源码【无聊写着玩的】
本帖最后由 13434230728 于 2023-1-5 23:33 编辑


        直接注册给你数据库资料




Navicat for MySQL工具



  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
子程序名返回值类型公开备 注
连接数据库  
数据库句柄 = 连接MySql (“mysql.sqlpub.com”, “qq776789331”, “1f21a3e7b970bfd2”, “qq776789331”, 3306)  ' 这里改一下自己的数据库地址格式|数据库名称,密码,数据库地址,数据库用户,端口
如果真 (数据库句柄 = 0)
标题 = “数据库连接失败”
返回 ()
标题 = “数据库连接成功”
执行SQL语句 (数据库句柄, “set names gbk”)
_查询_被单击 ()
子程序名返回值类型公开备 注
__启动窗口_创建完毕  
连接数据库 ()
子程序名返回值类型公开备 注
_按钮_创建表_被单击  
变量名类 型静态数组备 注
SQL语句文本型 
SQL语句 = “CREATE TABLE `wdaozhanghao` (`id` int(99) NOT NULL AUTO_INCREMENT,`状态` varchar(255) DEFAULT NULL,`账号` varchar(255) DEFAULT NULL,`密码` varchar(255) DEFAULT NULL,`服务器` varchar(255) DEFAULT NULL,`备注` varchar(255) DEFAULT NULL DEFAULT NULL,PRIMARY KEY (`id`)) ENGINE=InnoDB DEFAULT CHARSET=utf8;”
如果 (执行SQL语句 (数据库句柄, SQL语句))
信息框 (“创建成功”, 0, , )
信息框 (“创建失败”, 0, , )

子程序名返回值类型公开备 注
_查询_被单击  
变量名类 型静态数组备 注
SQL语句文本型 
计次整数型 
索引整数型 
记录集整数型 
id整数型 
账号文本型 
密码文本型 
服务器文本型 
状态文本型 
备注文本型 
超级列表框1.全部删除 ()
SQL语句 = “select * from wdaozhanghao”
执行SQL语句 (数据库句柄, SQL语句)
记录集 = 取记录集 (数据库句柄)
计次循环首 (取记录集行数 (记录集), 计次)
读字段值 (记录集, “id”, id)
读字段值 (记录集, “账号”, 账号)
读字段值 (记录集, “密码”, 密码)
读字段值 (记录集, “服务器”, 服务器)
读字段值 (记录集, “状态”, 状态)
读字段值 (记录集, “备注”, 备注)
索引 = 超级列表框1.插入表项 (, 到文本 (id), , , , id)
超级列表框1.置标题 (索引, 1, 状态)
超级列表框1.置标题 (索引, 2, 账号)
超级列表框1.置标题 (索引, 3, 密码)
超级列表框1.置标题 (索引, 4, 服务器)
超级列表框1.置标题 (索引, 5, 备注)
到下一行 (记录集)
计次循环尾 ()
释放记录集 (记录集)
子程序名返回值类型公开备 注
_添加_被单击  
变量名类 型静态数组备 注
SQL语句文本型 
错误文本文本型 
i整数型 
SQL语句 = “INSERT INTO wdaozhanghao(状态,账号,密码,服务器,备注)VALUES”“('” + 状态.内容 + “','” + 账号.内容 + “','” + 密码.内容 + “','” + 服务器.内容 + “','” + 备注.内容 + “')”
执行SQL语句 (数据库句柄, SQL语句)
调试输出 (SQL语句)
_启动窗口._查询_被单击 ()
子程序名返回值类型公开备 注
_修改_被单击  
变量名类 型静态数组备 注
SQL语句文本型 
错误文本文本型 
SQL语句 = “UPDATE wdaozhanghao SET 状态='” + 状态.内容 + “',账号='” + 账号.内容 + “',密码='” + 密码.内容 + “',服务器='” + 服务器.内容 + “',备注='” + 备注.内容 + “' WHERE id=”到文本 (_启动窗口.超级列表框1.取表项数值 (_启动窗口.超级列表框1.现行选中项))
调试输出 (SQL语句)
如果真 (执行SQL语句 (数据库句柄, SQL语句))
_启动窗口._查询_被单击 ()
返回 ()
信息框 (“修改失败”, 0, , )
返回 ()
子程序名返回值类型公开备 注
_超级列表框1_右键单击表项  
如果真 (超级列表框1.现行选中项 ≠ -1)
弹出菜单 (菜单, , )

子程序名返回值类型公开备 注
_读正常账号_被选择  
被选择 (_启动窗口, “读正常账号”)
子程序名返回值类型公开备 注
_读封号正常_被选择  
被选择 (_启动窗口, “读封号账号”)
子程序名返回值类型公开备 注
_读暂时封号_被选择  
被选择 (_启动窗口, “读暂时封号”)
子程序名返回值类型公开备 注
_读永久封号_被选择  
被选择 (_启动窗口, “读永久封号”)
子程序名返回值类型公开备 注
_读全部账号_被选择  
被选择 (_启动窗口, “读全部账号”)
子程序名返回值类型公开备 注
被选择  
参数名类 型参考可空数组备 注
要操作的窗口窗口如:_启动窗口
读写文本型
变量名类 型静态数组备 注
SQL语句文本型 
计次整数型 
索引整数型 
记录集整数型 
id整数型 
账号文本型 
密码文本型 
服务器文本型 
状态文本型 
备注文本型 
超级列表框1.全部删除 ()
如果真 (读写 = “读全部账号”)
SQL语句 = “select * from wdaozhanghao”
如果真 (读写 = “读正常账号”)
SQL语句 = “select * from wdaozhanghao where 状态='正常'”
如果真 (读写 = “读封号账号”)
SQL语句 = “select * from wdaozhanghao where 状态='封号'”
如果真 (读写 = “读暂时封号”)
SQL语句 = “select * from wdaozhanghao where 状态='暂时封号'”
如果真 (读写 = “读永久封号”)
SQL语句 = “select * from wdaozhanghao where 状态='永久封号'”
执行SQL语句 (数据库句柄, SQL语句)
记录集 = 取记录集 (数据库句柄)
计次循环首 (取记录集行数 (记录集), 计次)
读字段值 (记录集, “id”, id)
读字段值 (记录集, “账号”, 账号)
读字段值 (记录集, “密码”, 密码)
读字段值 (记录集, “服务器”, 服务器)
读字段值 (记录集, “状态”, 状态)
读字段值 (记录集, “备注”, 备注)
索引 = 超级列表框1.插入表项 (, 到文本 (id), , , , id)
超级列表框1.置标题 (索引, 1, 状态)
超级列表框1.置标题 (索引, 2, 账号)
超级列表框1.置标题 (索引, 3, 密码)
超级列表框1.置标题 (索引, 4, 服务器)
超级列表框1.置标题 (索引, 5, 备注)
到下一行 (记录集)
计次循环尾 ()
释放记录集 (记录集)
子程序名返回值类型公开备 注
_选中删除账号_被选择  
变量名类 型静态数组备 注
SQL语句文本型 
如果真 (超级列表框1.现行选中项 ≠ -1)
SQL语句 = “DELETE FROM wdaozhanghao WHERE id= ”到文本 (超级列表框1.取表项数值 (超级列表框1.现行选中项))
如果真 (执行SQL语句 (数据库句柄, SQL语句))
超级列表框1.删除表项 (超级列表框1.现行选中项)
信息框 (“删除成功”, 0, , )
返回 ()
信息框 (“删除失败 ”, 0, , )
返回 ()

子程序名返回值类型公开备 注
_删除全部账号_被选择  
变量名类 型静态数组备 注
SQL语句文本型 
数量整数型 
计次循环首 (_启动窗口.超级列表框1.取表项数 (), 数量)
SQL语句 = “DELETE FROM wdaozhanghao WHERE id= ”到文本 (超级列表框1.取表项数值 (数量))
执行SQL语句 (数据库句柄, SQL语句)
计次循环尾 ()
SQL语句 = “DELETE FROM wdaozhanghao WHERE id= ”到文本 (超级列表框1.取表项数值 (0))
执行SQL语句 (数据库句柄, SQL语句)
_查询_被单击 ()
子程序名返回值类型公开备 注
__启动窗口_将被销毁  
断开MySql (数据库句柄)
子程序名返回值类型公开备 注
_超级列表框1_左键单击表项  
状态.内容 = _启动窗口.超级列表框1.取标题 (_启动窗口.超级列表框1.现行选中项, 1)
账号.内容 = _启动窗口.超级列表框1.取标题 (_启动窗口.超级列表框1.现行选中项, 2)
密码.内容 = _启动窗口.超级列表框1.取标题 (_启动窗口.超级列表框1.现行选中项, 3)
服务器.内容 = _启动窗口.超级列表框1.取标题 (_启动窗口.超级列表框1.现行选中项, 4)
备注.内容 = _启动窗口.超级列表框1.取标题 (_启动窗口.超级列表框1.现行选中项, 5)


i支持库列表   支持库注释   
mysqlMySql支持库
iext扩展界面支持库一
spec特殊功能支持库

作者: 得意须尽欢    时间: 2023-1-5 23:47
这个在线mysql是不是云端存数据啊
作者: 1347379245    时间: 2023-1-5 23:48
感谢分享
作者: zyg666    时间: 2023-1-5 23:59
感谢分享
作者: 13434230728    时间: 2023-1-6 00:11
得意须尽欢 发表于 2023-1-5 23:47
这个在线mysql是不是云端存数据啊

数据库放在SQL的 写的数据库都发送都SQL数据库去 读取也是在SQL读取
作者: 396384183    时间: 2023-1-6 00:11

学习一下
作者: chen341200    时间: 2023-1-6 00:33
最简单mysql账号记录纯源码
作者: chen341200    时间: 2023-1-6 00:33
记录纯源码【无聊写着玩的
作者: chen341200    时间: 2023-1-6 00:33
记录纯源码【无聊写着玩的
作者: chen341200    时间: 2023-1-6 00:34
记录纯源码【无聊写着玩的
作者: 97435225    时间: 2023-1-6 03:51
666666666666666666666666
作者: 爱无情    时间: 2023-1-6 08:15
最简单mysql账号记录纯源码
作者: 一指温柔    时间: 2023-1-6 08:34
感谢分享
作者: 杰西卡技术传媒    时间: 2023-1-6 08:58
感谢分享
作者: shj0205    时间: 2023-1-6 09:24
感谢分享!
作者: luqing3719    时间: 2023-1-6 09:31
感谢分享!
作者: sinewtec    时间: 2023-1-6 09:35
!
作者: singlecolor    时间: 2023-1-6 09:38
瞅瞅看
作者: 幻1989    时间: 2023-1-6 09:38
蟹蟹大佬分享
作者: 玩味流星    时间: 2023-1-6 09:43

感谢分享!
作者: jysoft2022    时间: 2023-1-6 10:07
谢谢分享
作者: kyo9766    时间: 2023-1-6 10:12
可以学习一下 mysql ,感谢分享
作者: FUYUEPC    时间: 2023-1-6 10:54
非常不错,看了就要回复,留名!@!!!!
作者: reveriexue    时间: 2023-1-6 11:04
6666666666666
作者: lzst001    时间: 2023-1-6 12:51
感谢分享!
作者: 一个人的情人节    时间: 2023-1-6 13:50
感谢分享,很给力!~
作者: lmwdz    时间: 2023-1-6 13:56

支持开源~!感谢分享
作者: mytiger    时间: 2023-1-6 14:32
支持开源~!感谢分享
作者: 灵海雪缘    时间: 2023-1-6 15:06

作者: yksuper    时间: 2023-1-6 15:32
最简单mysql账号记录纯源码
作者: jing2020yi    时间: 2023-1-6 18:22
谢谢分享~
作者: 清风徐来2    时间: 2023-1-6 20:28
感谢分享
作者: yxl2008    时间: 2023-1-6 21:26
感谢分享,很给力!~
作者: 深圳梦    时间: 2023-1-6 21:44
支持开源~!感谢分享
作者: 794229345    时间: 2023-1-6 22:07
看下隐藏内容~~
作者: yisheng    时间: 2023-1-7 02:50
看看
作者: 残狼    时间: 2023-1-7 03:08
谢谢分享!

作者: 2869062521    时间: 2023-1-7 03:23
谢谢谢谢谢谢谢谢谢谢谢谢
作者: shy520    时间: 2023-1-7 19:09
感谢   正好需要
作者: 张硕1    时间: 2023-1-7 19:50
6666666666666666666666666666666666
作者: 江湖人称小强    时间: 2023-1-8 10:13
感谢分享。不会又不想学。
作者: 乐鱼驴    时间: 2023-1-8 10:45
这个不错哦

作者: webyezi    时间: 2023-1-8 10:56
谢谢大佬的分享
作者: hbgfbgfbgf    时间: 2023-1-8 19:40
不错 我一直还是用access  mysql一直还没使用
作者: 咕噜咕噜168    时间: 2023-1-8 21:59
很不错啊,可以学习学习
作者: PeacefulZzz    时间: 2023-1-9 11:09
不错不错,学习下!
作者: cx1937410794    时间: 2023-1-9 14:42
11111111111111111111111
作者: xuanpeng    时间: 2023-1-9 20:25
如果您要查看本帖隐藏内容请回
作者: wa690602724    时间: 2023-1-9 22:39
免费的SQL服务不知道能用多久

作者: wuyang521    时间: 2023-1-10 14:43
66666666666666666
作者: 一米侠    时间: 2023-1-10 20:27
谢谢 学习学习
作者: godandwoman    时间: 2023-1-11 14:42
666666666666666666666666
作者: wzi    时间: 2023-1-11 21:56
666666666666666666
作者: wxlhl520    时间: 2023-1-12 20:11
最简单mysql账号记录纯源码【无聊写着玩的】简单例子 适合新手
作者: Marvin    时间: 2023-1-13 20:35
谢谢分享,支持开源!
作者: 7104186    时间: 2023-1-14 01:18
提示创建数据库连接池是失败了是什么原因
作者: zhaoguofu    时间: 2023-1-16 11:06
0000000000000000000
作者: 1117for    时间: 2023-1-19 15:48
我看看 谢谢楼主
作者: 极光12    时间: 2023-1-19 19:55

作者: 香草?Triste°    时间: 2023-1-20 22:49
        开源精神必须支持~
作者: 喵帕斯和艾希    时间: 2023-1-20 23:33
感谢楼主分享
作者: 923046620    时间: 2023-1-25 16:58
11111111111111111
作者: kongkdc    时间: 2023-1-26 23:53
谢谢大佬分享,拿一个来参考下,买的云服务器不会用,连接不上.....
作者: thsoft    时间: 2023-1-27 15:54
http://sqlpub.com
这个数据库是免费的吗?能免费用多久???
作者: qiran183    时间: 2023-1-28 20:16
6+5455556+5+5+
作者: minews    时间: 2023-1-28 20:58
纯源码【无聊写
作者: 天枢    时间: 2023-1-28 22:59
感谢分享
作者: 11125    时间: 2023-1-29 09:10
这个数据库是免费的吗?能免费用多久
作者: 良人旧柯梦    时间: 2023-1-31 14:43
感谢大佬分享
作者: taotao197710    时间: 2023-2-1 09:25
学习学习
作者: sxxiaokai    时间: 2023-2-4 11:16
学习学习
作者: 百事可乐2018    时间: 2023-2-26 22:06
谢谢大佬的分享

作者: dxp04    时间: 2023-4-15 16:01
开源精神,必须支持
作者: huagewl    时间: 2023-4-19 18:35
支持一下!!!!!!




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4