易截截图软件、单文件、免安装、纯绿色、仅160KB

使用VB将Excel导入到Sql中

使用VB把Excel导入到Sql数据库中,其实有几种方法。
下面我介绍的这种方法,较为简单。
其实这种方法的话,是直接使用T-SQL操作的,因此,到了VB里面,直接eccute这个代码就OK了的。
-----------------------------------------------------下面是在T-sql中的语句
if object_id('NewTable') is not null/*判断表NewTable是否存在,如果存在则删除它*/
        drop table NewTable
Select * Into NewTable from OpenDataSource('Microsoft.Jet.OLEDB.4.0'," _
                   & "'Data Source=" & Excel文件名(绝对路径) & _
                   ";User ID=Admin;Password=;Extended properties=Excel 5.0')...[工作表名]
-----------------------------------------------------上面是在T-sql中的语句
这样,就把这个Excel工作表完整的导入到Sql当前数据库下的NewTable的表中了。
如果想到VB里面使用,则连接到这个数据库,并且使用Excute执行上面的T-SQL语句即可。


相关文档:

VB调整Excel格式

Private Sub Cmd_OK_Click()
    Dim ExcelAppX As Excel.Application
    Dim ExcelBookX As Excel.Workbook
    Dim ExcelSheetX As Excel.Worksheet
   
    Dim a(1 To 3) As Single
    Dim strFormat As Variant ......

.net中用DropDownList选择日期(vb代码)

看了别人写的C#的 自己转了一下 然后后重新改了改 写成了这个
另外还有一个我写的验证日期是否合法的代码 在后面 都是vb的 c#只会看不会写
  '判断闰年=======================
Private Function CheckLeap(ByVal year As Integer) As Boolean
If (year Mod 4 = 0) AndAlso (year Mod 100 <> ......

Sql(事物+游标)使用方法

--当两个或两以上的操作要么都执行,要么都不执行时要用事务。
1. Sql写法(事物+游标)
--开始事务
BEGIN TRAN
--不显示计数信息
SET NOCOUNT ON
DECLARE @ProjNo varchar(50),@CusNo varchar(50)
--声明游标
DECLARE CRMPSContact_cursor CURSOR FOR 
SEL ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号