begin process at 2010 02 09 20:38:54
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

VB.NET

 > RENAMEFILE

RENAMEFILE


 Information sur la source

Note :
8 / 10 - par 1 personne
8,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :VB.NET Source .NET ( DotNet ) Niveau :Débutant Date de création :26/01/2005 Vu / téléchargé :6 343 / 322

Auteur : nariel1

Ecrire un message privé
Commentaire sur cette source (4)
Ajouter un commentaire et/ou une note

 Description

Voila ma 1ere source en VB.net . Rien de bien genial mais un petit script qui renome en masse des fichiers avec un libellé choisi et une variable incrementable suivant le nombre de fichier dans le repertoire



 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip W2K SHUTDOWN
Source avec Zip CREER UN LETTRE TYPE WORD DEPUIS VB
Source avec Zip OUVRIR OUTLOOK ET ECRIRE UN MESSAGE EN FORMAT HTML
Source avec Zip OUVRIR WORD

 Sources de la même categorie

Source avec Zip Source avec une capture Source .NET (Dotnet) INSERER TOUT TYPE DE FICHIERS DANS ORACLE EN VB.NET par SKY32
Source avec Zip Source avec une capture Source .NET (Dotnet) ENVOYER DES EMAILS AVEC PIECES JOINTES EN EXÉCUTANT BLAT par mays
Source avec Zip Source avec une capture Source .NET (Dotnet) PILOTER DES AFFICHEURS 7 SEGMENTS À PARTIR DU PORT SÉRIE OU ... par mays
Source avec Zip Source avec une capture Source .NET (Dotnet) CONTROLER LE WEBBROWSER ET IDENTIFIER LES LIENS PAR LEUR NUM... par george02
Source avec Zip Source .NET (Dotnet) LOGIN AVEC FICHIER XML par DanMor498

Commentaires et avis

Commentaire de beltegeuse le 10/08/2006 19:21:56

Bon code en tout cas pour moi il marche normalement (oui je l'ai un peu transformer)
mais jsute une remarque sur cette ligne :

myEnd = Microsoft.VisualBasic.Right(myString, 3)

cette ligne a pour but de recupere l'extension du fichier le seul probleme que l'on peut dire (en chipotant) c'est que les extension ne sont pas obliger de ne faire que 3 lettre même si c'est la configuration qui est la plus répandu.
donc j'opterai pour un truc du genre :

'il faut Imports System.String

dim emplacement_point as integer
dim Lfichier as integer

emplacement_point = InStr(1, NameFile, ".") 'donne la postion du point
Lfichier = NameFile.Length
myEnd = Mid(Namefile, emplacement_point, Lfichier - emplacement_point) 'attention on a le point
'avec cette methode sinon il faut faire :
'myEnd = Mid(Namefile, emplacement_point + 1, (Lfichier - emplacement_point) - 1)

Commentaire de gillardg le 22/06/2008 00:16:48

BELTEGUSE,
Dim Extension As String =System.IO.Path.GetExtension("filePath")

Commentaire de beltegeuse le 22/06/2008 20:51:58

On deterre des vielle sources!
Certes c'est beaucoup mieux comme cela mais à l'époque je n'utilisait pas des biblio comme System ... etc.

Commentaire de gillardg le 22/06/2008 21:11:32

sur vbfrance.com quand je fais une recherche je trouve toujours un tas de trucs en plus que je cherchais même pas

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,343 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales