डेटाबेस से पढ़ें और डेटाटेबल

Question

भरें मुझे DataReader द्वारा डेटा का एक सेट मिल रहा है और एक स्ट्रिंग को असाइन किया जा रहा है। अब मुझे क्वेरी फ़ील्ड के साथ DataTable कॉलम भरने होंगे। DataTable भरे हुए डेटा को प्रदर्शित करने के लिए ग्रिड से जुड़ा हुआ है।

क्वेरी है:

strSQL = "SELECT EmpCode,EmpID,EmpName FROM dbo.Employee 

DataTable कॉलम EmpCode, EmpID, EmpName हैं।

मुझे क्वेरी को पढ़ने और DataTable के कॉलम को असाइन करने और तालिका भरने की आवश्यकता है। मैंने नीचे की कोशिश की है, लेकिन मुझे उचित आउटपुट नहीं मिला है,

Me.DtShifts.Tables("NonAllocated").Clear() 
Me.DtShifts.Tables("NonAllocated").Load(dr) 

Answer 1

कनेक्शन ऑब्जेक्ट केवल चित्रण के लिए है। डेटा एडाप्टर कुंजी बिट है:

Dim strSql As String = "SELECT EmpCode,EmpID,EmpName FROM dbo.Employee" 
Dim dtb As New DataTable 
Using cnn As New SqlConnection(connectionString) 
    cnn.Open() 
    Using dad As New SqlDataAdapter(strSql, cnn) 
    dad.Fill(dtb) 
    End Using 
    cnn.Close() 
End Using