连接到SQL数据库

时间:2014-04-29 05:34:30

标签: sql vb.net

我正在连接到Sql Database,在一个连接中,我正在更改我的查询 时间,这是我的代码的基本结构。结构工作正常。

我有以下问题

1)这是向Sql Database发送不同查询的正确方法。

2)这会导致任何内存泄漏或错误。

dim conn

set conn=CreateObject("ADODB.Connection")

With conn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString ="Data Source=C:\MAP_sample.xls;" & "Extended Properties=Excel 8.0;"
.Open
End With

Set rs = CreateObject("ADODB.Recordset")

Query = "SELECT * FROM [Sheet1$] where StateName='ABC'"   

rs.Open  Query,conn

rs.close

更改查询

Query = "SELECT * FROM [Sheet1$] where ID='321'"   

rs.Open  Query,conn
rs.close

更改查询

Query = "SELECT * FROM [Sheet1$] where NAME='SMITH'"   

rs.Open  Query,conn
rs.close

Set rs = nothing

conn.close
Set conn = nothing

1 个答案:

答案 0 :(得分:0)

看起来像带有visual basic的经典ASP。

  1. 这是发送查询的可能变种之一,它不错,有点boilerplate,作为建议 - 尝试将其重新分解为单独的类或函数
  2. 不,当您拨打close
  3. 时,它不会导致内存泄漏或错误
      

    您可以稍后调用Open方法重新建立与相同或另一个数据源的连接。

    当您需要同时打开2个记录集时,这种方法的唯一问题是

    如果你谈到一般代码的可读性 - 最好使用有意义的变量名