vba編程教程 mysql優(yōu)化教程?
mysql優(yōu)化教程?1、對SQL語句、索引、表結(jié)構(gòu)等進行優(yōu)化。2、開啟查詢緩存,Query Cache緩存了SELECT查詢及其結(jié)果數(shù)據(jù)集,當執(zhí)行一個同樣的SELECT查詢時,MySQL會從內(nèi)存中直接
mysql優(yōu)化教程?
1、對SQL語句、索引、表結(jié)構(gòu)等進行優(yōu)化。
2、開啟查詢緩存,Query Cache緩存了SELECT查詢及其結(jié)果數(shù)據(jù)集,當執(zhí)行一個同樣的SELECT查詢時,MySQL會從內(nèi)存中直接取出結(jié)果,加快了查詢執(zhí)行速度、減小了數(shù)據(jù)庫的壓力。執(zhí)行SHOW VARIABLES LIKE "have_query_cache"可以查看MySQL查詢緩存是否打開,開啟查詢緩存只需配置my.cnf文件即可,具體如下:
query_cache_type = 1
query_cache_size = 128M
query_cache_limit = 1M
保存好后重啟MySQL。
3、選用InnoDB存儲引擎,MySQL常用存儲引擎是MyISAM和InnoDB,二者區(qū)別如下:
MyISAM
查詢速度快;
支持表級鎖,在上鎖期間表上不能進行其他操作;
支持全文檢索;
支持數(shù)據(jù)壓縮、自我復制、查詢緩存、數(shù)據(jù)加密;
不支持外鍵;
不支持事務(wù),所以也就沒有COMMIT和ROLLBACK操作;
不支持集群數(shù)據(jù)庫。
InnoDB
支持行級鎖;
支持外鍵,對外鍵約束強制;
支持事務(wù),可執(zhí)行COMMIT和ROLLBACK操作;
支持數(shù)據(jù)壓縮、自我復制、查詢緩存、數(shù)據(jù)加密;
可用在集群環(huán)境,但并不完全支持。InnoDB表可以轉(zhuǎn)換為NDB存儲引擎,這樣就能用在集群環(huán)境。
vba怎么將excel數(shù)據(jù)插入mysql數(shù)庫庫?
1、定義連接db的過程:Dim oConn As ADODB.ConnectionPrivate Sub ConnectDB() Set oConn = New ADODB.Connection oConn.Open "DRIVER={MySQL ODBC 5.1 Driver}" & _ "SERVER=localhost" & _ "DATABASE=yourdatabase" & _ "USER=yourdbusername" & _ "PASSWORD=yourdbpassword" & _ "Option=3"End Sub2、執(zhí)行db插入的具體寫法:Dim rs As ADODB.RecordsetPrivate Sub InsertData() Set rs = New ADODB.Recordset ConnectDB With wsBooks For rowCursor = 2 To 11 strSQL = "INSERT INTO tutorial (author, title, price) " & _ "VALUES ("" & esc(.Cells(rowCursor, 1)) & "", " & _ """ & esc(.Cells(rowCursor, 2)) & "", " & _ esc(.Cells(rowCursor, 3)) & ")" rs.Open strSQL, oConn, adOpenDynamic, adLockOptimistic Next End WithEnd Sub
ExcelVBA怎么連接mysql數(shù)據(jù)庫?
可以使用以下代碼在EXCEL上使用VBA連接MYSQL數(shù)據(jù)庫 :
Dim strconnt As String strconnt = "" Set connt = New ADODB.Connection Dim sevip, Db, user, pwd As String "設(shè)服務(wù)器地址、所連數(shù)據(jù),及登錄用戶密碼 sevip = "localhost" Db = “test" user = "root" pwd = "123456" strconnt = "DRIVER={MySql ODBC 5.3 Unicode Driver}SERVER=" & sevip & "Database=" & Db & "Uid=" & user & "Pwd=" & pwd & "Stmt=set names GBK" connt.ConnectionString = strconnt connt.Open