begin process at 2012 02 13 17:39:13
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

Fichier / Disque

 > 

adresse de fichier


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

adresse de fichier

samedi 16 juillet 2005 à 17:15:08 | adresse de fichier

panach57

Bonjour tout le monde, Mon probleme est le suivant: Le programme doit choisir un fichier aléatoirement dans un répoirtoire de mon disque. Ce répertoire, il le connait c'est moi qui le lui indique. Une fois choisi, il a juste a me retourner n'adresse de ce fichier. Voila si vous pouviez me donner un petit coup de main... Bonne journée a tous merci
samedi 16 juillet 2005 à 17:44:10 | Re : adresse de fichier

BruNews

Administrateur CodeS-SourceS
L'adresse, OUATE ISIS ???

ciao...
BruNews, MVP VC++
samedi 16 juillet 2005 à 17:51:50 | Re : adresse de fichier

CanisLupus

Membre Club Administrateur CodeS-SourceS
vb6 ou vb.net ?

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?
samedi 16 juillet 2005 à 17:59:16 | Re : adresse de fichier

panach57

Alors je programme en VB6 et j'appelle adresse l'emplacement du fichier sur le disque dur exemple: c:\mes documents\fichier.txt

Merci d'avance

samedi 16 juillet 2005 à 21:25:51 | Re : adresse de fichier

Galain

Membre Club
Salut Panache57
D'abord l'emplacement d'un fichier sur un disque dur est représentée par les clusters alloué au fichier (un cluster est la plus petite unité d'écriture ou de lecture sur un disque dur et contient un certain nombre de secteurs)
Si on reprend ton exemple c:\mes documents\fichier.txt pour trouver les clusters de fichier.txt il faut trouver ceux du répertoire racine C:\ puis ceux du répertoire mes documents puis enfin ceux de fichier.txt.
Il faut connaître l'organisation d'un disque dur selon son système de fichiers ( FAT ou NTFS)
Si tu veux un exemple je te propose ma source "Acces Direct Disque" dont voici l'URL : http://www.vbfrance.com/code.aspx?ID=32480

bonne prog et A+


GRENIER Alain
samedi 16 juillet 2005 à 22:33:08 | Re : adresse de fichier

panach57

Oui effectivement, je m'exprime trés mal, je ne cherche pas a faire quelque chose d'aussi évolué. Ton programme est trés intéressant effectivement mais ne correspond pas à ma recherche. s'il y a d'autre réponses elles sont les bienvenues.

Panache57
samedi 16 juillet 2005 à 22:52:34 | Re : adresse de fichier

Galain

Membre Club
Salut Panache57
Rassures toi tu t'exprimes assez bien pour te faire comprendre !
Dans quel but veux-tu avoir la localisation d'un fichier sur le disque dur ? Cela pourrait m'aider à te proposer une solution car mon programme le fait .

A + 

GRENIER Alain
dimanche 17 juillet 2005 à 00:33:40 | Re : adresse de fichier

panach57

oui tout a fait ça peut aider. Alors voila le principe est trés simple. Des profiles sont enregistrés dans un dossier (d:\profiles) au format simple .txt. Ces profiles sont alors chargés aléatoirement (je me répète)

Le But du petit programme: C'est un outil de travail sur la communication, il permet de mettre en évidence les stéréotype que nous avons. Ainsi en chargeant un profil nous nous faisons une idée de la personne ainsi présenté. Bon il serait souhaitable que l'on ne charge pas plusieurs fois le meme profil (mais j'ai ma petite là dessus)

Pourquoi du .txt: Le commanditaire souhaite pouvoir ajouter simplement des profiles.

Voila en espérant avoir apporté une précision
merci Galain
dimanche 17 juillet 2005 à 14:10:51 | Re : adresse de fichier

CanisLupus

Membre Club Administrateur CodeS-SourceS
Réponse acceptée !

Salut,

Vois si cet exemple peut te donner une piste :

Private Sub Form_Load()
Dim Chemin As String
Dim t() As String
Dim f As String
Dim idx As Integer

  Chemin = "c:\temp\test\"
  idx = -1
 
' remplissage du tableau avec les chemin\nom_de_fichier.txt
  f = Dir(Chemin & "*.txt")
 
  Do While f <> ""
    idx = idx + 1
    ReDim Preserve t(idx)
    t(idx) = Chemin & f
    f = Dir
  Loop
 
' choix au hasard
  If idx > -1 Then
    Randomize Time 'init du générateur aléatoire
    MsgBox t(UBound(t) * Rnd)
    'ou open t(UBound(t) * Rnd) for ......
  End If
 
End Sub


-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

dimanche 17 juillet 2005 à 16:22:42 | Re : adresse de fichier

panach57

Merci CanisLupus Je viens d'apprendre un truc. La fonction dir j'y avais pas pensais et je savais pas que c'est possible. Tu me retire une fière chandelle du pied.

Bonne journée à tous


Cette discussion est classée dans : fichier, adresse


Répondre à ce message

Sujets en rapport avec ce message

trouver la meme adresse reseaux pour sauvegarder un fichier a partir de plusieurs ordi [ par snebe45 ] bonjour, je voudrais s'avoir si il est possible a partir d'un code vba de retrouver l'adresse ou ce trouve un fichier ouvert. car je dois automatisé variable [ par stefolo ] Bonjour à tous,Je cherche désespérément une solution pour reprendre le contenu d'une variable un peu comme la fonction indirect() dans excel.Voici le FTP [ par POURMONET ] Bonjour, j'utilise couramment la fonction [b]InternetOpenUrl [/b]et les fonctions associées sans problème sur différents sites. Aujourd'hui, je dois r [Excel] Comparaison de données avancées... [ par wyzer13 ] Bonjour, Je suis nouveau sur le site et je tiens remercier les créateurs car c'est une mine d'or !!! La raison de mon post est que je cherche actue Assigner adresse IP + masque depuis un fichier csv [ par perlon ] Bonjour, Je cherche un moyen d'assigner des adresses IP à plusieurs postes de travail de manière automatique; Je m'explique: Le poste démarrerait, i Aller chercher l'adresse d'un fichier [ par Zer0Termi ] Bonjour à tous, J'aimerais aller chercher l'adresse ( chemin d'accès ) d'un PDF via une fenêtre de parcours ou un outils dans le genre ..... Mais je Import de données d'un fichier excel à un autre [ par tedm ] Bonjour, Je suis débutant en VBA. Ca fait quelques heures que je cherche une solution à mon problème... sans succès. Je voudrais que mon script ouvre Evenement de la barre d'adresse (Explorateur de fichier) [ par thonyboy ] Bonjour Est ce qu'il est possible de trapper un evenement sur l'explorateur de fichier, afin d'appeler une routine a chaque fois qu'il y a un changem Obtenir le chemin d'un dossier (et non d'un fichier) [ par InfoGeo ] Salut ! Je suis sous excel. Je voudrais savoir s'il est possible (je pense que oui mais bon), d'obtenir l'adresse d'un dossier grâce à un bouton "par Adresse du Fichier .exe utilisé pour lancer le .exe [ par jlb_Yahoo ] Bonjouren Vb 2005/2008  My.Application.Info.AssemblyName donne le nom de l'application, du .<fon


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
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 : 8,830 sec (3)

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