【有源码】TC数据库操作的应用

fch1008

看
源码

aone0311

11111111111111111111111

wjb0822

学习学习

ywlg1011

GOOD!

jiaozhe

变量 c**tr = "Driver=MySQL ODBC 5.1 Driver;Server=localhost;UID=root;PWD=123456;Database=liyong;Port=3306"
变量 sql = "CREATE TABLE 创建( 姓名 VARCHAR(100) not NULL,年龄 VARCHAR(100) not null,性别 VARCHAR(100) not null)"
变量 line = 0
变量 ret_array
变量 err
//创建表
变量 ret = 数据库(c**tr,sql,line,ret_array,err)
sql = "INSERT INTO `创建`(`姓名`,`年龄`,`性别`)VALUES(\"周杰伦\",\"38\",\"男\"),(\"刘德华\",\"65\",\"男\"),(\"杨幂\",\"30\",\"女\")"
//插入数据
ret = 数据库(c**tr,sql,line,ret_array,err)
sql = "SELECT * FROM liyong.创建 WHERE `性别`='男'"
//查询数据
ret = 数据库(c**tr,sql,line,ret_array,err)
if(isarray(ret_array))
变量 value,key,str
变量 onelen = arraysize(ret_array)
变量 twolen = arraysize(ret_array[0])
for(变量 i = 0; i < onelen; i++)
for(变量 j = 0; j < twolen; j++)
arraygetat(ret_array[i],j,value,key)
str = str & key & " : "&value&" , "
end
str = str &"\n"
end
messagebox(str) //打印查询到的信息
end

封号者

宝宝vb

ZHIHUAVIP

111111111111111111111111111111

剑仙十号

学过编程的都知道,任何中小型管理系统,都是通过对数据库的增删改查来实现的.。
既然我们的TC支持数据库操作,那么我们用TC写进销存系统,以及OA系统,那也是不在话下。

lizhi

我看看啊

iouoo

太好了