將數(shù)據(jù)導(dǎo)入SQLServer中,不知道為什么以下代碼不能正常運行。 [金字塔]
- 咨詢內(nèi)容:
請教:我想將數(shù)據(jù)導(dǎo)入SQLServer中,不知道為什么以下代碼不能正常運行
Set adoConn=CreateObject("Adodb.Connection")
'連接數(shù)據(jù)庫
cnnSting="Provider=SQLOLEDB;Data Source=EVE_ZHENG\sqlexpress;Initial Catalog=securityDB;Persist Security Info=True;User ID=sa;Password=steward1"
adoConn.Open cnnSting
MsgBox cnnSting
'讀取合約分鐘線數(shù)據(jù)
Set HistroyData = marketdata.GetHistoryData("ag00","sq",0)'若要是分鐘這里填0,日線填5 上期所=SQ,大期所=DQ,鄭期所=ZQ
for i = HistroyData.count-1 to 1 step -1
strSql="insert into datam1(品種代碼,交易日期,時,分,o,h,l,c,成交量)values('AG00','" & HistroyData.date(i)
strSql=strSql & "'," & mid(HistroyData.date(i),12,2) &"," & mid(HistroyData.date(i),114,2) &"," & HistroyData.Open(i) & "," & HistroyData.High(i) & "," & HistroyData.Low(i) & "," & HistroyData.Close(i)
strSql=strSql & "," & HistroyData.Volume(i) & ")"
MsgBox strSql
adoConn.Execute strSql
最后一個MSGBOX 沒有顯示
- 金字塔客服:
搞定了,是
Set HistroyData = marketdata.GetHistoryData("ag00","sq",0)'若要是分鐘這里填0,日線填5 上期所=SQ,大期所=DQ,鄭期所=ZQ
沒有得到相關(guān)的數(shù)據(jù)。
有思路,想編寫各種指標(biāo)公式,程序化交易模型,選股公式,預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 1145508240 進行 有償 編寫!(不貴!點擊查看價格!)
相關(guān)文章
-
沒有相關(guān)內(nèi)容