在ado中使用ODBC的dsn连接Oracle、Mysql等数据库 Autohotkey | Thinkai's Blog

Thinkai's Blog

Autohoutkey|Python|php|aardio|VOIP|IT 爱好者

在ado中使用ODBC的dsn连接Oracle、Mysql等数据库 Autohotkey 521

作者为 发表

Autohotkey

ODBC驱动可以搜索“数据库类型 windows ODBC 插件”安装;DSN需要在开始菜单,Windows管理工具中找“ODBC 数据源(32 位)”,此处如果用32位的AHK则用32位的版本添加,不然无法访问。

a := new adodb
a.open("DSN=testdb;UID=thinkai;PWD=password;") ;到DSN里面配置了用户名密码则UID PWD不用配置。
ret := a.GetTable("select getdate()")
MsgBox % ret.1.1

class adodb
{
	;static conn

	__New() ;新建
	{
	this.conn:= ComObjCreate("ADODB.connection") ;初始化COM
	}

	open(connect_str) ;打开文件
	{
		try
			this.conn.Open(connect_str)
		catch e
			return e.Message
	}

	close() ;关闭文件
	{
		this.conn.Close()
	}

	GetTable(sql)
	{
		t := []
		query := this.conn.Execute(sql)
		if RegExMatch(sql,"i)^select*")
		{
			try
			{
				fetchedArray := query.GetRows() ;取出数据(二维数组)
				colSize := fetchedArray.MaxIndex(1) + 1 ;列最大值 tips:从0开始 所以要+1
				rowSize := fetchedArray.MaxIndex(2) + 1 ;行最大值 tips:从0开始 所以要+1
				loop, % rowSize
				{
					i := (y := A_index) - 1
					t[y] := []
					loop, % colSize
					{
						j := (x := A_index) - 1
						t[y][x] := fetchedArray[j,i] ;取出二维数组内值
					}
				}
			}
			query.Close()
			return t
		}
	}
}



评论给 闺房独自乐 7个评论



大喜 2018年8月15日 的 08:10

这里真心不错,每次来都有新收获!

罗拉套图网 2018年8月2日 的 08:09

到你的博客走一趟,如同阳光洒在我脸上,心里暖洋洋!

闺房独自乐 2018年7月13日 的 17:51

炎热的夏天,看到这样的博客瞬间清凉了许多!

爱就爱啦 2018年7月5日 的 07:57

从百度点进来的,学习学习,呵呵!

藏金网 2018年7月2日 的 15:15

生活不止眼前的苟且,还有博客和远方的田野!

948 2018年6月21日 的 16:25

炎热夏天,闲来无事,拜读博客,消暑解闷!

kitty23 2018年6月17日 的 15:55

第一次看,感觉还挺新鲜!


友情链接:Autohotkey中文论坛Autohotkey中文帮助Autohotkey官网我的B站直播间如若生涯一场梦博客联系作者免GooglePlay APK下载

 主题设计 • skyfrit.com  Thinkai's Blog | 保留所有权利

64 queries in 2.405 seconds |