2013-07-11 199 views
-1

我正在爲旅行公司構建客戶端數據庫系統。VB.NET和SQL,將SELECT查詢結果粘貼到文本框

他們希望能夠與點擊檢索所有他們的客戶的電子郵件,並將其顯示在頁面上,在那裏他們可以複製它,並粘貼到Outlook上一個文本框。

目前,該文本框被稱爲的emailList,並點擊稱爲emailGet的按鈕,直到看不見。

但是,我不知道如何使文本顯示爲從SQL查詢文本框。

我的SQL查詢:SELECT CEmail FROM Clients。這是非常多的。

僞代碼,我想要做的是:

sqlQuery = "SELECT CEmail FROM Clients" 
Execute select query and store results (in a variable? or maybe directly to the textbox?) 
emailList.Text = Result of sqlQuery 

謝謝! :)

+2

你需要使用SQL的讀者這一點。看一下這個。 [SO](http://stackoverflow.com/questions/7918020/getting-data-from-sql-server-database)。下次使用搜索功能... –

回答

1
Private Sub GetEmailAddresses() 
     Dim sText As String = String.Empty 
    Dim sConnString As String = String.Empty 'Put your connection string in here 

    Using cn As New OleDb.OleDbConnection(sConnString) 
     cn.Open() 
     Dim cmd As New OleDb.OleDbCommand("SELECT CEmail FROM Clients", cn) 
     Dim r As OleDb.OleDbDataReader = cmd.ExecuteReader() 

     If Not r.HasRows Then Exit Sub 

     Do While r.Read() 
      sText = sText & ";" & r.GetString(0) 
     Loop 

     cn.Close() 
    End Using 

    txtboxList.Text = sText 
End Sub 
+0

感謝您的回覆! :)我的連接字符串是'PROVIDER = Microsoft.Jet.OLEDB.4.0; Data Source = | DataDirectory | AlfarisGuestsDB.mdb',一旦我使sConnString =我上面寫的,它說關鍵字'provider'沒有被識別:/我總是使用該連接字符串,它工作正常。 –

+0

上面我使用的是SQL數據庫的連接。如果你使用的是Access數據庫,那麼你需要一個OLEDB連接。我修改了我的答案以反映 – rwisch45

+0

啊,這很有趣。今天學到了新東西。 :D感謝十億,我的朋友! –