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
我该如何解决?
这是我的班级文件
导入Microsoft.VisualBasic 导入Google.GData.Contacts 导入Google.GData.Client 导入Google.GData.Extensions 导入Google.Contacts
Public Class Google 公共共享函数GetGmailContacts(ByVal AppName为String,ByVal Uname为String,ByVal UPassword为String)作为DataSet Dim ds As New DataSet() Dim dt As New DataTable() Dim C2作为新DataColumn() C2.DataType = Type.GetType C2.ColumnName =“EmailID” dt.Columns.Add(C2) Dim rs作为新的RequestSettings(AppName,Uname,UPassword) rs.AutoPaging = True Dim cr As New ContactsRequest(rs) 昏暗作为饲料(接触)= cr.GetContacts() 对于每个联系人f.Entries 对于每封电子邮件,如电子邮件,电子邮件 Dim dr1 As DataRow = dt.NewRow() dr1(“EmailID”)= email.Address.ToString() dt.Rows.Add(DR1) 下一个 下一个 ds.Tables.Add(DT) 返回ds 结束功能
结束班
答案 0 :(得分:2)
验证DataSet
是否在范围内(您可能需要添加Import
声明),或者通过替换DataSet
来完全限定代码中的Dim ds As DataSet
引用与Dim ds As System.Data.DataSet
。
答案 1 :(得分:0)
您可能需要引用GAC中的System.Data
程序集和Imports System.Data
(位于文件顶部),以便将DataSet类纳入范围。