Forum select

Hejsan
jag har valt att bygga mitt forum med SqlDataReader
men jag vet inte hur jag skall lägga ut looparna / SQL sattserna så att den tar Root tråden å sen skriver ut alla tråder som har samma ID å tillhör. här är Coden
Jag är väldig tacksamm för all hjälp jag kan få
tack på förhand.

function testar()
	dim strSql as string
	dim objDataReader as sqlDataReader
	dim objDataReader2 as sqlDataReader
		strSql = "SELECT \* FROM konftest"
		objDataReader = getData.getQuerysqlCommand(strSql).ExecuteReader()
		
		Do while objDataReader.Read()
		hej2.Text += "\<b\>" & objDataReader("konfName") & "\</b\>\<br\>" 
		strSql = "SELECT \* FROM konfSvar WHERE konf_Id='" & objDataReader("konf_Id").ToString() & "'"
		objDataReader2 = getData.getQuerysqlCommand(strSql).ExecuteReader()
		Do while objDataReader2.Read()
		hej.Text += objDataReader2("konfRubrik") & "\<br\>" 
		loop
		loop

End function

Flyttas till SQL forumet.

Här får du en ide om hur du kan göra:

function testar() 
dim strSql as string 
dim objDataReader as sqlDataReader 
strSql = "SELECT a.konfName, b.konfRubrik FROM konftest a,
konfSvar b WHERE b.konf_ID = a.konf_ID ORDER BY a.DatePosted DESC" 
objDataReader = getData.getQuerysqlCommand(strSql).ExecuteReader() 

Do while objDataReader.Read() 
hej2.Text += "<b>" & objDataReader("konfName") & "</b><br>" 
hej.Text += objDataReader("konfRubrik") & "<br>" 
loop

End function