webForumDet fria alternativet
Logga in / Bli medlem

Forum select

Databaser & SQL

2 svar · 215 visningar · startad av dotnet-snake

Medlem sedan feb. 20033 inlägg
Trådstart#1

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
Medlem sedan apr. 20012 266 inlägg
#2

Flyttas till SQL forumet.

Medlem sedan dec. 2000399 inlägg
#3

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
257 ms totalt · 4 externa anrop · v20260731065814-full.51f67c91
118 ms — deklarationer (db)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)
126 ms — ändringar (db)