Everything looks ok. The query maybe returning the wrong data
Put a break point on the following line
Dim myDataAdapter1 As New SqlDataAdapter( _sqlStmt, conString
After the report button click event retrieve what's in the _sqlStmt string variable. You should be able to get that text from Immediate Window. Copy it over to SQL query analyzer, execute it and see what you get
Suresh
----- DC Gringo wrote: ----
Suresh, here's the whole thing
<%@ Import Namespace="Syst em.Data" %><%@ Import Namespace="Syst em.Data.SqlClie nt" %><%@ Import Namespace="Syst em.Web.UI.WebCo ntrols" %><%@ Import Namespace="Syst em.Web.UI.WebCo ntrols.DropDown List" %><%@ Page Language="VB" Debug="true" %><script runat="server" language="VB"
Protected _sqlStmt As String =
"SELECT c1.clnName as Community, s1.clnGUID, s1.clnPriorityC orrectedTC a
Impact, PopulationKeyIn fo = ISNULL(s1.clnPo pulationKeyInfo ,0)
MinedAreaVictim Count = ISNULL(mavc1.Mi nedAreaVictimCo unt,0), nonRecentVicti
= ISNULL(s1.clnVi ctimOldKilled + s1.clnVictimOld Injured, 0), SHACount
ISNULL(mavc1.SH ACount,0), clnEconomicBase TC
ISNULL(s1.clnEc onomicBaseTC,'N one specified'), MinDistance
ISNULL(sha1.Min Distance, 0), VictimAssist = ISNULL(mavc1.Vi ctimAssist
'No'), clnMADoneTC = ISNULL(s1.clnMA DoneTC,'Unknown ') FROM tblSurvey1 s
INNER JOIN tblCity c1 ON s1.clnNearestCi tyGUID = c1.clnGUID INNER JOI
vwMinDistancesT oNearestSHA sha1 ON s1.clnGUID = sha1.clnSurveyG UID LEF
OUTER JOIN vwMinedAreaVict imCount mavc1 ON s1.clnGUID = mavc1.clnGUID WHER
s1.clnPriorityC orrectedTC <> 'None'
Protected _sqlStmt5 As String =
"SELECT c1.clnName, s1.clnGUID FROM tblSurvey1 s1 INNER JOIN tblCity c1 O
s1.clnNearestCi tyGUID = c1.clnGUID ORDER BY c1.clnName
'Protected WithEvents ddlCommunities A
System.Web.UI.W ebControls.Drop DownLis
Sub Page_Load(Sourc e As Object, E As EventArgs
'If Not Page.IsPostBack The
BindData(
'End I
End Su
Sub BindData(
Dim conString As String = "server=server; database=db;uid =user;pwd=pwd;
Dim myDataSet1 As New DataSe
Dim myDataAdapter1 As New SqlDataAdapter( _sqlStmt, conString
myDataAdapter1. Fill(myDataSet1 , "Communitie sT1"
DataGrid2.DataS ource = myDataSet1.Tabl es("Communities T1"
Dim myDataSet5 As New DataSe
Dim myDataAdapter5 As New SqlDataAdapter( _sqlStmt5, conString
myDataAdapter5. Fill(myDataSet5 , "Communitie sT2"
ddlCommunities. DataSource = myDataSet5.Tabl es("Communities T2"
ddlCommunities. DataMember = "Communitie sT2
ddlCommunities. DataTextField = "clnName
ddlCommunities. DataValueField = "clnGUID
DataGrid2.DataB ind(
ddlCommunities. DataBind(
End Su
Sub SortCommand_OnC lick(Source As Object, E A
DataGridSortCom mandEventArgs
_sqlStmt = _sqlStmt & " ORDER BY " & E.SortExpressio
BindData(
End Su
Sub PageIndexChange d_OnClick(Sourc e As Object, E A
DataGridPageCha ngedEventArgs
DataGrid2.Curre ntPageIndex = E.NewPageInde
BindData(
End Su
Sub RunReport_OnCli ck(sender As Object, e As System.EventArg s
_sqlStmt = _sqlStmt & " AND s1.clnGUID
'"+ddlCommuniti es.SelectedItem .Value+"'
BindData(
End Su
</script><html><h ead><title></title><style
.DataGrid {font:x-small Verdana, Arial, sans-serif
</style><LINK rel="stylesheet " href="../Styles.css" type="text/css"></head><body><asp :dropdownlist Font-Size="8" id="ddlCommunit ies" runat="server
Width="100"></asp:dropdownlis t></td><ASP:Button id="cmdRunRepor t" Text="Run Report" runat="server
onclick="RunRep ort_OnClick" /><asp:DataGri
AllowCustomPagi ng="false
AllowPaging="tr ue
AllowSorting="t rue
AlternatingItem Style-BackColor="#EFE FEF
AutoGenerateCol umns="false"
Border="0"
Cellpadding="4"
Cellspacing="0"
CssClass="DataG rid"
DataKeyField="c lnGUID"
Enabled="true"
EnableViewState ="true"
HeaderStyle-BackColor="Blac k"
HeaderStyle-Font-Bold="True"
HeaderStyle-ForeColor="Whit e" id="DataGrid2" runat="server"
ShowFooter="fal se"
OnSortCommand=" SortCommand_OnC lick"
OnPageIndexChan ged="PageIndexC hanged_OnClick"
PageSize="50"
PagerStyle-Mode="NumericPa ges"
PagerStyle-HorizontalAlign ="Right"
ShowHeader="tru e"
<SelectedItemS tyle Font-Bold="True" ForeColor="#663 399"
BackColor="#FFC C66"></SelectedItemSty le><ItemStyle Font-Size="8pt" Font-Names="Verdana" ForeColor="#330 099"
BackColor="Whit e"></ItemStyle><Head erStyle Font-Size="8pt" Font-Names="Verdana" Font-Bold="True"
HorizontalAlign ="Center" ForeColor="#FFF FCC"
BackColor="#990 000"></HeaderStyle><Fo oterStyle ForeColor="#330 099" BackColor="#FFF FCC"></FooterStyle><Co lumns><asp:Hype rLinkColumn DataNavigateUrl Field="Communit y"
DataNavigateUrl FormatString="c lnGUID" DataTextField=" Community"
Visible="true" NavigateUrl="ht tp://{cgi.server_nam e}/c={clnGUID}"
SortExpression= "Community"
HeaderText="Com munity" text="Community " runat="server"> <HeaderStyle HorizontalAlign ="Left"></HeaderStyle><It emStyle HorizontalAlign ="Left"></ItemStyle></asp:HyperLinkCo lumn><asp:Bound Column DataField="Impa ct" SortExpression= "Impact"
HeaderText="Imp act"></asp:BoundColumn ><asp:BoundColu mn DataField="Popu lationKeyInfo"
SortExpression= "PopulationKeyI nfo" HeaderText="Pop ulation<br>Key
Info"></asp:BoundColumn ><asp:BoundColu mn DataField="Mine dAreaVictimCoun t"
SortExpression= "MinedAreaVicti mCount"
HeaderText="Rec ent<br>Victims" ></asp:BoundColumn ><asp:BoundColu mn DataField="SHAC ount" SortExpression= "SHACount"
HeaderText="No. of<br>SHA's"></asp:BoundColumn ><asp:BoundColu mn DataField="clnE conomicBaseTC"
SortExpression= "clnEconomicBas eTC"
HeaderText="Eco nomic<br>Base"> </asp:BoundColumn ><asp:BoundColu mn DataField="clnM ADoneTC" SortExpression= "clnMADoneT C"
HeaderText="Min e Risk<br>Educati on"></asp:BoundColumn ><asp:BoundColu mn DataField="Vict imAssist" SortExpression= "VictimAssi st"
HeaderText="Vic tim<br>Assist"> </asp:BoundColumn ><asp:BoundColu mn DataField="MinD istance" SortExpression= "MinDistanc e"
HeaderText="Min Distance<br>to SHA"></asp:BoundColumn ></columns><PagerS tyle HorizontalAlign ="Center" ForeColor="#330 099"
Position="TopAn dBottom" BackColor="#FFF FCC"
Mode="NumericPa ges"></PagerStyle></asp:DataGrid></form></body></html>