Halloj!

Vill göra en liten applikation som ska köras på en PocketPC och använder mig av
.NET Compact Framework 2.0 för att försöka använda detta. Jag kommunicerar med
en SQL-server databas som ligger på en extern server. När jag kommer in i applikationen
så visas liggande "jobb", och när man väljer ett jobb så kommer man till en bild där man
får information om jobbdetaljerna. Att välja jobb går jättebra, den listar upp dem i en combobox så
fint så.

När jag väl kommer till jobbdetaljerna så får jag direkt "Jobb klart!" Messageboxen så den verkar inte hitta någon data. Om jag däremot kör SQL-strängen i Sql Server Management Studio Express så får jag upp en rad, men den verkar den skita högaktningsfullt i av någon anledning.


Nedan finns koden:

<code>
Public Sub startJob(ByVal JobID As String)
'Starta Jobb
Me.lblJobID.Text = JobID

Dim strConnection As String = "Data Source=111.222.333.444;Initial Catalog=TestDB;UID=sa;PWD=sa"
Dim Conn As New SqlConnection(strConnection)
Conn.Open()

Dim Comm As New SqlCommand
Comm = New SqlCommand("SELECT * FROM tblVjobb ORDER BY TvThree ASC", Conn)

Dim rs As SqlDataReader = Comm.ExecuteReader()

If rs.RecordsAffected = -1 Then
If MessageBox.Show("Jobb klart!", "Färdigt", MessageBoxButtons.OK, MessageBoxIcon.None, MessageBoxDefaultButton.Button1) = Windows.Forms.DialogResult.OK Then
Form1.PopCb()
Form1.Show()
Me.Hide()
Else
rs.Read()
Me.lblTestval1.Text = rs("TvOne")
Me.lblTestval1.Visible = True
Me.lblTestval2.Text = rs("TvTwo")
Me.lblTestval2.Visible = True
Me.lblTestval3.Text = rs("TvThree")
Me.lblTestval3.Visible = True
Me.tbTestval3.Focus()
wLoc = rs("TvThree")
inQuan = rs("TvQuan")
End If
End If
End Sub
</code>

Någon som ser något direkt fel jag gör??