All pastes #761522 Raw Edit

Stuff

public text v1 · immutable
·published 2007-11-04 22:50 UTC
rendered paste body

Public Class DataAccess
    Public Function GetAuthors(ByVal state As String) As AuthorsDataSet
        Dim authorsTableAdapter As New AuthorsDataSetTableAdapters.authorsTableAdapter
        Dim authorsData As New AuthorsDataSet()
        authorsTableAdapter.Fill(authorsData.authors, state)
        Return authorsData
    End Function
End Class