dim sql as string="select * into #temp from AAA"
中如何写执行这段SQL ，最后数据库中才会有#temp 这个表

sqlCmd As New SqlCommand("", sqlCn)
dim strSql as string="insert into #tmp select * from TableA"
= strSql
sqlCmd.ExecuteNonQuery()

Imports System.Data.SqlClient
Imports System.Data


Dim sqlconn As New SqlConnection
        Dim sqlcomm As New SqlCommand
        Dim connStr As String
        '应加上数据库服务器名，数据库名，数据库密码
        connStr = "Server=192.168.10.89;Database=dvr-data;user Id=sa;Password="
        sqlconn.ConnectionString = connStr

        '应加上数据库服务器测试，数据库名及数据库密码测试
        sqlconn.Open()
        sqlcomm.Connection = sqlconn
        Dim dataRd As SqlDataReader
         = CommandType.Text
        Dim commStr As String
        commStr = "SELECT DVR_Data.* FROM DVR_Data"
         = commStr
        sqlconn.Close()
        sqlconn.Open()
        dataRd = sqlcomm.ExecuteReader

这样写如果换了数据库名称和电脑IP改变了怎么办

这样写如果换了数据库名称和电脑IP改变了怎么办