编译.vb文件.dll错误 [英] Compile .vb file .dll error
本文介绍了编译.vb文件.dll错误的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
导入 Microsoft.VisualBasic
导入 System.Data
导入 System.Data.SqlClient
公共 类查询
Dim str As 字符串
Dim cmd As SqlCommand
Dim dr As SqlDataReader
Dim con As System.Data.SqlClient.SqlConnection = 新 System.Data.SqlClient.SqlConnection(ConfigurationManager.ConnectionStrings(" ).ConnectionString )
Dim da As SqlDataAdapter
Dim ds As 数据集
Dim dt As DataTable
功能读取( ByVal str As 字符串) As SqlDataReader
尝试
24:con.Close()
如果 con.State = ConnectionState.已关闭或 con.State = ConnectionState.Broken 结束 如果
cmd = 新建 SqlCommand(str,con)
dr = cmd.ExecuteReader(CommandBehavior.CloseConnection)
返回博士
捕获,例如 As 异常
如果左(例如消息, 20 )= " 连接字符串" 新建 System.Data.SqlClient.SqlConnection(ConfigurationManager.ConnectionStrings(" ).ConnectionString)
转到 24
结束 如果
返回博士
结束 尝试
结束 功能
结束 类
当我将此文件编译为.dll文件时,显示错误
未声明名称配置管理器".请帮助
解决方案
您似乎忘记了Import System.Configuration
语句.
>
Imports Microsoft.VisualBasic
Imports System.Data
Imports System.Data.SqlClient
Public Class query
Dim str As String
Dim cmd As SqlCommand
Dim dr As SqlDataReader
Dim con As System.Data.SqlClient.SqlConnection = New System.Data.SqlClient.SqlConnection(ConfigurationManager.ConnectionStrings("cn").ConnectionString)
Dim da As SqlDataAdapter
Dim ds As DataSet
Dim dt As DataTable
Function read(ByVal str As String) As SqlDataReader
Try
24: con.Close()
If con.State = ConnectionState.Closed Or con.State = ConnectionState.Broken Then
con.Open()
End If
cmd = New SqlCommand(str, con)
dr = cmd.ExecuteReader(CommandBehavior.CloseConnection)
Return dr
Catch ex As Exception
If Left(ex.Message, 20) = "The ConnectionString" Then
con = New System.Data.SqlClient.SqlConnection(ConfigurationManager.ConnectionStrings("cn").ConnectionString)
GoTo 24
End If
Return dr
End Try
End Function
End Class
When I Compile This File To .dll File It Shows Error
Name ''Configuration Manager'' Is Not Declared.Please Help
解决方案
It looks you forgot a Import System.Configuration
statement.
这篇关于编译.vb文件.dll错误的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文