Does anyone have any idea how I can resolve this? I've posted some of the code from these files below.
Thanks
Sub
Page_Load(sender As Object, e As EventArgs)
if parmcatid = "" then
parmcatid = request.querystring(
"parmcatid")
end if
dim strconn as String=ConfigurationSettings.appSettings("strconn1")
dim objconn as new sqlconnection(strconn)
dim strselect as String= "Select * from links where link_inactive=0 and cat_id=" & parmcatid & " order by sortKey "
strselect +=
"select dept_navheading from departments where dept_code= (select cat_dept from category where cat_id=" & parmcatid & ")"
dim daSelect as New sqldataadapter(strselect,objconn)
daselect.tablemappings.add(
"nav", "links")
daselect.tablemappings.add(
"nav1","dept")
daselect.fill(dsnav,
"nav")
NavLinks.datasource=dsnav.tables(
"links").defaultview
NavLinks.databind()
Dim dr as datarow
If dsnav.tables("dept").Rows.count > 0 Then
dr = dsnav.tables(
"dept").rows(0)
head.text = dr.item(
"dept_Navheading")
Else
head.text =
""
End If
end
sub