VBNET的WIN程序怎么能一次导入100万数据到SQL数据库中

VBNET的WIN程序如何能一次导入100万数据到SQL数据库中？
VBNET的WIN程序如何能一次导入100万数据到SQL数据库中？我常导入时发生连接超时。

------解决方案--------------------
两个方法：
1、先DIM一个DATASET,并新建一个TATLE,将数据读到TATLE后,再连接到SQL并进行处理.
2、建一MDB文件，读数据到其表中，连接SQL，复制TATLE。
------解决方案--------------------
mark!
------解决方案--------------------
用DTS

strCmd = "dtsrun " & _
" /S " & ControlChars.Quote & _SQLName & ControlChars.Quote & _
" /U " & ControlChars.Quote & _SQLUser & ControlChars.Quote & _
" /P " & ControlChars.Quote & _SQLPass & ControlChars.Quote & _
" /N " & ControlChars.Quote & "Load_SSMCHDTAP " & ControlChars.Quote & _
" /A " & ControlChars.Quote & "@FileName " & ControlChars.Quote & _
"= " & ControlChars.Quote & strFile & ControlChars.Quote

_DtsCode = Shell(strCmd, AppWinStyle.NormalFocus, True)
If _DtsCode <> 0 Then _Err = "上载商户资料文件时失败. "