title: DataSet not defined?
body: <pre><code>Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
      Dim AppName As String = Session("App_Name").ToString()
      Dim username As String = Session("username").ToString()
      Dim password As String = Session("password").ToString()
      Dim ds As DataSet = GContactsImport.GetGmailContacts(AppName, username, password)
      GridView1.DataSource = ds
      GridView1.DataBind()
  
  
  End Sub
  </code></pre>
  
  <p>how do i fix it??</p>
  
  <p>This is my class file</p>
  
  <p>Imports Microsoft.VisualBasic
  Imports Google.GData.Contacts
  Imports Google.GData.Client
  Imports Google.GData.Extensions
  Imports Google.Contacts</p>
  
  <p>Public Class Google
      Public Shared Function GetGmailContacts(ByVal AppName As String, ByVal Uname As String, ByVal UPassword As String) As DataSet
          Dim ds As New DataSet()
          Dim dt As New DataTable()
          Dim C2 As New DataColumn()
          C2.DataType = Type.GetType
          C2.ColumnName = "EmailID"
          dt.Columns.Add(C2)
          Dim rs As New RequestSettings(AppName, Uname, UPassword)
          rs.AutoPaging = True
          Dim cr As New ContactsRequest(rs)
          Dim f As Feed(Of Contact) = cr.GetContacts()
          For Each t As Contact In f.Entries
              For Each email As EMail In t.Emails
                  Dim dr1 As DataRow = dt.NewRow()
                  dr1("EmailID") = email.Address.ToString()
                  dt.Rows.Add(dr1)
              Next
          Next
          ds.Tables.Add(dt)
          Return ds
      End Function</p>
  
  <p>End Class</p>