Torna al Thread

Protected Sub ddlCrd_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ddlCrd.SelectedIndexChanged 'pulisco errore lblErrore.Text = "" Try Dim di As New DirectoryInfo("C:\utilitagenerali\promoter\Report\crd_" & ddlCrd.Text) ' Get a reference to each directory in that directory. Dim diArr As DirectoryInfo() = di.GetDirectories() 'visualizzo le sottodirectory Dim dri As DirectoryInfo ddlMeseAnno.Items.Clear() For Each dri In diArr ddlMeseAnno.Items.Add(dri.Name) Next dri Response.Write(Server.MapPath("")) Catch ex As Exception lblErrore.Text = "Selezione non genera visualizzazione di report !" End Try End Sub
Copyright © 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5