VB.Net中SQL的连接问题？
下面代码连接出错！怎样在它的基础上修改，使程序能正常运行呢？
麻烦大侠了！
自己定义的全局模块
Imports System.Data
Imports System.DBNull
Imports System.Data.SqlClient
Module Module1
Public UserName As String
Public pepdom As Integer
Public CL As Integer
Public M As Integer
Public c_id As String = ""
Public m_id As String = ""
Public EN As Boolean
Public o_id As String
Public SU As Double
'定义系统的公共变量'
Public objDataSet As DataSet
'定义一个数据集对象'
Public objDataView As DataView
'定义一个数据视图对象'
Public objDataAdpter As SqlDataAdapter
'定义一个数据适配器对象'
Public objSqlConnection As SqlConnection = New SqlConnection("data source=(local);initial catalog=FoodSvc;" & "intergrated security=SSPI;user id=sa")
'定义一个数据连接对象，并初始化'
Public objCurrencyManager As CurrencyManager
'定义一个当前的绑定管理对象'
Public UserSqlstr As String = "SELECT *from UserInfo"
相关问答：
帮我改改 我总觉得有问题
Type ID
number As Single
score As Integer
name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
i = 0
&nbs ......
我有一个表，结构是这样。
转出 单位 转入单位 笔数 金额
date(主) outid(主) inid(主) num amt
2009 1 2 1 500 为 1 单位 在2009� ......
今天做了一个存储过程 环境是SQL2000数据库
大致如下
建立临时表
定义员工游标
循环员工（属于1个公司)
......
从数据库中查询一张表的数据
select 部门,姓名 from tb
如何才能生成下面的xml格式
XML code:
<folder state="unchecked" label="全部">
<folder state="unchecked&qu ......
