hi!

i have the following code below, but it gives me errors.
please help!

Dim myConn As SqlConnection = New SqlConnection(connString)
Dim strSQL As String
strSQL = " SELECT c.citymame, ct.coutryname, ct.countryabbr, s.statename, s.stateabbr" _
& " FROM city c,coutrytable ct,state s" _
& " WHERE c.countryid = s.countryid " _
& " AND s.stateid = c.stateid "

Dim cmd As SqlCommand = New SqlCommand
cmd.Connection = myConn
cmd.CommandType = CommandType.Text
cmd.CommandText = strSQL

Dim myDA As New SqlDataAdapter

myDA.SelectCommand = cmd
Dim myDS As New Dataset1
'problem here
' myDA.Fill(myDS, "countrytable")


Dim orpt As New CrystalReport2
orpt.SetDataSource(myDS)

CrystalReportViewer1.ReportSource = orpt