Response.clear

Question

Hi everybody I have this: [code] If ds.Tables.Count > 0 AndAlso ds.Tables(0).Rows.Count > 0 Then lblMessage.Text = Er zijn geen resultaten gevonden. lblMessage.Text = String.Empty Dim fc As Byte() = csv.Export(ds.Tables(0)) Response.Clear() Response.ContentType = text/csv Response.AddHeader(Content-Disposition attachment;filename=facturatie.csv) Response.OutputStream.Write(fc 0 fc.Length) Response.End() Else lblMessage.Text = Er zijn geen resultaten gevonden. End If [/code] I dont want to show the lbMessage when there is found results. But because of the Response.Clear() method clears the HTML. SO that doesnt work. So how to manage that you will not see the lbMessage() when results found Thank you

albert albert · Answer

?? Then you will see the message if if there are no results. But the message will not go away when there are results. So THe message will stay. That is the issue. this is the hole method: [code] Protected Sub btnExport_Click(ByVal sender As Object ByVal e As EventArgs) Handles btnExport.Click LblMelding.Text = String.Empty Dim merk As Integer ' export dingen doen Dim csv As New DealerportalControl.CsvExport() Dim ds As DataSet PasType = String.Empty For Each item As ListItem In ChlPassType.Items If (item.Selected) Then If Not String.IsNullOrEmpty(PasType) Then PasType &=  PasType &= item.Value End If Next If User.IsInRole(DA) Then ds = GlobalBLL.wsCertificaat.GetCertificatenForExportDA(GetFormatDateFromString(tbStartDatum.Text) GetFormatDateFromString(tbEindDatum.Text) PasType) Else ds = GlobalBLL.wsCertificaat.GetCertificatenForExport(GetFormatDateFromString(tbStartDatum.Text) GetFormatDateFromString(tbEindDatum.Text) PasType Context.Profile(BedrijfID)) End If If ds.Tables.Count > 0 AndAlso ds.Tables(0).Rows.Count > 0 Then ' lblMessage.Text = String.Empty Response.Write(lblMessage.Text = String.Empty) Dim fc As Byte() = csv.Export(ds.Tables(0)) Response.Clear() lblMessage.Text = String.Empty Response.ContentType = text/csv Response.AddHeader(Content-Disposition attachment;filename=facturatie.csv) Response.OutputStream.Write(fc 0 fc.Length) Response.End() Else lblMessage.Text = Er zijn geen resultaten gevonden. Server.ClearError() 'Response.Flush() End If End Sub [/code]

Jignesh Trivedi · Answer

hi your code itself remove the content of lblMessage label ... I think try after remove lblMessage.Text = String.Empty sentence. hope this will help you.