none
SlideShowExtender dinâmico RRS feed

  • Pergunta

  • Olá pessoal,

    Estou querendo implementar dentro de um DataGrid um SlideShow. Estou tentando fazer como descrito abaixo, mas não está me retornando resultado algum.

    1º) SlideService:

    Imports System.Web
    Imports System.Web.Services
    Imports System.Web.Services.Protocols
    
    ' To allow this Web Service to be called from script, using ASP.NET AJAX, uncomment the following line.
    ' <System.Web.Script.Services.ScriptService()> _
    <WebService(Namespace:="http://tempuri.org/")> _
    <WebServiceBinding(ConformsTo:=WsiProfiles.BasicProfile1_1)> _
    <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
    Public Class SlidesService
         Inherits System.Web.Services.WebService
        Private Imagem As MDI.objProdutosImagem
    
        <WebMethod()> _
        Public Function GetSlides(ByVal pProduto As WebControls.Label) As AjaxControlToolkit.Slide()
            Dim Ds As Data.DataSet
            Dim pTeste As String
            Ds = Imagem.Consultar(" Produto_ID = " & pProduto.Text, "")
            Dim MySlide(Ds.Tables(0).Rows.Count) As AjaxControlToolkit.Slide
    
            For I As Integer = 0 To Ds.Tables(0).Rows.Count - 1
                MySlide(I) = New AjaxControlToolkit.Slide("~/arquivos/" & _
                                                          Ds.Tables(0).Rows(0)("PImagem_Nome"),
                                                          Ds.Tables(0).Rows(0)("PImagem_Titulo"),
                                                          Ds.Tables(0).Rows(0)("PImagem_Comentario"))
                pTeste = Ds.Tables(0).Rows(0)("PImagem_Nome")
            Next
    
            Return MySlide
    
        End Function
    
    End Class

    2º) Página ASPX:

    <%@ Page Language="VB" AutoEventWireup="false" CodeFile="produtos.aspx.vb" Inherits="cliente_produtos" %>
    
    <%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
    
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    
    <html xmlns="http://www.w3.org/1999/xhtml">
    <head runat="server">
        <title></title>
        <link href="../estilos.css" rel="stylesheet" type="text/css" />
    </head>
    <body>
        <form id="form1" runat="server">
        <div>
            <div style="margin-bottom:20px;"><h1>
                <asp:ScriptManager ID="ScriptManager1" runat="server">
                </asp:ScriptManager>
                LISTA DE PRODUTOS</h1></div>
            <div>
                <div>Selecione uma categoria:</div>
                <div style="margin-bottom:20px;"><asp:DropDownList ID="ddlCategoria" runat="server" 
                        AutoPostBack="True" DataTextField="Categoria_Nome" 
                        DataValueField="Categoria_ID" CssClass="campos1"></asp:DropDownList>
                </div>
    
                <div>
                    <asp:DataGrid ID="DataGrid1" runat="server" AutoGenerateColumns="False" 
                        CssClass="grid">
                        <AlternatingItemStyle CssClass="grid alternate" />
                        <Columns>
                            <asp:TemplateColumn>
                                <ItemTemplate>
                                    <div style="font-size:16px; font-weight:bold;">
                                        
                                        
                                    </div>
                                    <div style="padding:10px 0px 10px 10px;">
                                        <table border="0" cellpadding="0" cellspacing="0" style="width:100%;">
                                            <tr>
                                                <td width="60%">
                                                    <asp:Label ID="gLbCodProduto" runat="server" Text='<%# DataBinder.Eval(Container, "DataItem.Produto_ID") %>' Visible="False"></asp:Label>
                                                    <div style="font:normal normal bold 16px; "><asp:Label ID="gLbProduto" runat="server" Text='<%# DataBinder.Eval(Container, "DataItem.PRODUTO") %>'></asp:Label></div>
                                                </td>
                                                <td>
                                                    <div style="width: 25px">
                                                    </div>
                                                </td>
                                                <td width="40%">
                                                    <div><asp:Image ID="Image1" runat="server" Height="300px" 
                                                            style="border:solid 1px black; " Width="277px" /></div>
                                                    <div style="text-align:center;">
                                                        <asp:ImageButton ID="BtnPrimeiro" runat="server" ImageUrl="~/imagens/primeiro.png" />
                                                        <asp:ImageButton ID="BtnPlay" runat="server" ImageUrl="~/imagens/play.png" />
                                                        <asp:ImageButton ID="BtnProximo" runat="server" ImageUrl="~/imagens/proximo.png" />
                                                    </div>
                                                    <div><asp:SlideShowExtender ID="SlideShowExtender1" runat="server"
                                                                                TargetControlID="Image1"
                                                                                SlideShowServicePath="SlidesService.asmx"
                                                                                SlideShowServiceMethod="GetSlides(gLbCodProduto)"
                                                                                AutoPlay="true"
                                                                                ImageDescriptionLabelID="gLbTituloImg"
                                                                                NextButtonID="BtnProximo"
                                                                                PreviousButtonID="BtnPrimeiro"
                                                                                PlayButtonID="BtnPlay"
                                                                                />
                                                    </div>
                                                </td>
                                            </tr>
                                        </table>
                                    </div>
                                </ItemTemplate>
                            </asp:TemplateColumn>
                        </Columns>
                    </asp:DataGrid></div>
            </div>
        </div>
        </form>
    </body>
    </html>
    

    3º) Codigo VB:

    Partial Class cliente_produtos
        Inherits System.Web.UI.Page
        Private Categoria As New MDI.objCategorias
        Private Produto As New MDI.objProdutos
        Private Imagem As New MDI.objProdutosImagem
    
        Private Sub PovoaCategoria()
            Dim Ds As Data.DataSet
            Ds = Categoria.Consultar("", "")
            ddlCategoria.DataSource = Ds
            ddlCategoria.DataBind()
            ddlCategoria.Items.Insert(0, New ListItem("--SELECIONE--", "0"))
    
        End Sub
    
        Private Sub PovoaProduto()
            Dim Ds As Data.DataSet
            Ds = Produto.Consultar(" Categoria_ID = " & ddlCategoria.SelectedValue, "")
            DataGrid1.DataSource = Ds
            DataGrid1.DataBind()
    
        End Sub
    
        Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
            If Not IsPostBack Then
                PovoaCategoria()
    
            End If
    
        End Sub
    
        Protected Sub ddlCategoria_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ddlCategoria.SelectedIndexChanged
            PovoaProduto()
    
        End Sub
    
    End Class

    Como posso corrigir esse problema?

    Grato,

    Ilano.

    sexta-feira, 13 de março de 2015 18:56

Todas as Respostas

  • Boa tarde ilanocf,

    Podemos fechar esta thread com algum posicionamento seu ou ainda não encontrou uma solução para o seu problema?

    Atenciosamente


    Marcos SJ

    Esse conteúdo e fornecido sem garantias de qualquer tipo, seja expressa ou implícita

    MSDN Community Support

    Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

    quarta-feira, 10 de fevereiro de 2016 18:46