For i As Integer = 0 To ja.count - 1
Dim ja1 As JArray = ja(i)
'直接写入后台数据
cmd.Parameters.clear
cmd.Parameters.Add("@name",ja1(0).ToString)
cmd.Parameters.Add("@date",ja1(1).ToString)
cmd.Parameters.Add("@om",ja1(2).ToString)
cmd.Parameters.Add("@high",ja1(3).ToString)
cmd.Parameters.Add("@low",ja1(4).ToString)
cmd.Parameters.Add("@end",ja1(5).ToString)
cmd.Parameters.Add("@pre",ja1(6).ToString)
cmd.Parameters.Add("@change",ja1(7).ToString)
cmd.Parameters.Add("@chg",ja1(8).ToString)
cmd.Parameters.Add("@vol",ja1(9).ToString)
cmd.Parameters.Add("@amount",ja1(10).ToString)
cmd.ExecuteNonQuery
Else
如果是sqlserver，建议看看：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=147288&replyID=60077&skin=1
或者：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=159738&replyID=&skin=1
加好友 
发短信
Post By：2021/4/9 8:41:00 [显示全部帖子]
