Soyez le premier à donner votre avis sur cette source.
Snippet vu 15 160 fois - Téléchargée 29 fois
pour avoir une fenetre input sur le form il faut copier ce code directement dans l'HTML <input id="file1" type="file" size="20" name="file1" runat="server"> dans le behind il faut ajouter Imports System.IO dans le bouton "btnenvoyer" il faut rajouter ce code Private Sub btnenvoyer_ServerClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnenvoyer.ServerClick Dim thepath As String thepath = "C:\Inetpub\wwwroot\annuaire\" If File.Exists(thepath & "personnel.xls") Then 'je copie d'abord le fichier existant dans un autre repertoire en rajoutant la date dans son nom pour garder toutes les sauvegardes. File.Copy(thepath & "personnel.xls", "C:\sauvegarde-annuaire\personnel" & Now.ToString("d-MM-yy-hms") & ".xls") 'je supprime le fichier existant avant de recevoir le nouveau dans mon repertoire, et je verifie qu'on a bien selectionner un autre fichier avant de supprimer l'existant If Not file1.PostedFile Is Nothing Then File.Delete(thepath & "personnel.xls") End If End If j'importe le nouveau fichier If Not file1.PostedFile Is Nothing Then file1.PostedFile.SaveAs(thepath & "personnel.xls") End If End Sub
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.