Compras/RepComprasPrecios.aspx.vb

@@ -45,6 +45,8 @@ Partial Class RepComprasPrecios
     Protected Sub GvDatos_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvDatos.RowDataBound
         If e.Row.RowType = DataControlRowType.DataRow Then
 
+            'GvDatos.Columns(1).ItemStyle.Width = New Unit("500px")
+
             GvDatos.HeaderRow.Cells(0).Visible = False
             e.Row.Cells(0).Visible = False
 
@@ -99,7 +101,7 @@ Partial Class RepComprasPrecios
     Private Sub Imprime(Formato As String)
         If DtCompras IsNot Nothing Then
             Dim StrFiltro As New StringBuilder
-            If DdlProveedor.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Proveedor:</b> {0}", DdlProveedor.SelectedItem.Text)
+            If DdlProveedor.SelectedValue.ToEntero > 0 Then StrFiltro.AppendFormat("Proveedor: {0},", DdlProveedor.SelectedItem.Text)
             GvDatos.ExportToExcelG("RepComprasPrecios.xlsx", "Reporte de Precios de Compras", UsuarioActual, StrFiltro.ToString, 100, 200)
 
             'Dim StrFiltro As New StringBuilder
@@ -132,4 +134,6 @@ Partial Class RepComprasPrecios
     Private Sub ImgExcel_Click(sender As Object, e As EventArgs) Handles ImgExcel.Click
         Imprime("Excel")
     End Sub
+    Public Overrides Sub VerifyRenderingInServerForm(ByVal control As Control)
+    End Sub
 End Class