首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > asp.net >

三天了都没解决的 VS2003类 转到 2005无法使用的有关问题 有详细说明

2012-01-16 
三天了都没解决的 VS2003类转到 2005无法使用的问题 有详细说明!ImportsMicrosoft.VisualBasicImportsSyst

三天了都没解决的 VS2003类 转到 2005无法使用的问题 有详细说明!
Imports   Microsoft.VisualBasic
Imports   System.Data.SqlClient
Imports   System.IO

Public   Class   DBController
        Private   connectingstring   As   String
        Private   myConn   As   SqlConnection
        Private   ds   As   Data.DataSet
        Private   myAdapter   As   SqlDataAdapter
        Private   mycmd   As   SqlCommand
        Public   Sub   New()

                System.Configuration.ConfigurationManager.AppSettings( "Connectionstring ").ToString.Trim()
                myConn   =   New   SqlConnection(connectingstring)

        End   Sub
        Public   Sub   open()
                myConn.Open()
        End   Sub
        Public   Sub   close()
                myConn.Close()
        End   Sub
        Public   Function   Getds()   As   Data.DataSet
                Return   ds

        End   Function
        '===================================================================
        '函数名:   Cest     (测试模块)
        '功能描述:执行无返回值的数据操作
        '输入参数:sqlstr,getid(分为插入,修改,查询)
        '返回值:查询返回   SqlDataReader对象,其他无返回值
        '创建时间:2007.4.10
        '修改时间:2007.4.10
        '====================================================================
        Public   Sub   Cest(ByVal   sqlstr   As   String,   ByVal   getid   As   String)
                Try
                        Select   Case   getid
                                Case   "插入 "

                                        myAdapter   =   New   SqlDataAdapter(sqlstr,   myConn)
                                        ds   =   New   Data.DataSet()
                                        myAdapter.Fill(ds)
                                Case   "修改 "
                                        If   myConn.State   =   Data.ConnectionState.Closed   Then
                                                myConn.Open()



                                        End   If
                                        mycmd   =   New   SqlCommand(sqlstr,   myConn)
                                        mycmd.ExecuteNonQuery()
                                        mycmd.Dispose()
                                Case   "查询 "

                                        If   myConn.State   =   Data.ConnectionState.Closed   Then
                                                myConn.Open()

                                        End   If
                                        mycmd   =   New   SqlCommand(sqlstr,   myConn)
                                        Dim   reader   As   SqlDataReader
                                        reader   =   mycmd.ExecuteReader
                                        mycmd.Dispose()
                        End   Select
                Catch   ex   As   Exception

                End   Try

        End   Sub
        '===================================================================
        '函数名:   Fill
        '功能描述:执行无返回值的数据操作
        '输入参数:sqlstr
        '返回值:无返回值
        '创建时间:2007.4.10
        '修改时间:2007.4.10
        '====================================================================
        Public   Sub   fill(ByVal   sqlstr   As   String)
                myAdapter   =   New   SqlDataAdapter(sqlstr,   myConn)
                ds   =   New   Data.DataSet()
                myAdapter.Fill(ds)
        End   Sub


这是个数据库连接的类  

在2003下   使用正常

2005下   重新命名     而且   System.Configuration.ConfigurationManager.AppSettings( "Connectionstring ").ToString.Trim()



读不出   connectionstring的值     WEB.config正常  

2005用什么语句读这个
还有   老是提示需要   NEW重新命名


请问各位大大   如何解决这个问题

我2003的类要重新写了么?  



[解决办法]
如果要用ConfigurationManager.AppSettings( "Connectionstring ").ToString.Trim()来取,config里应该写成
<add key= "Connectionstring " value= "test connection string "/>
</appSettings>

热点排行