vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Top-Preis! AP-Access-Tools-CD Volume 1  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Fortgeschrittene
Re: Automatische Verzeichnisorganisation 
Autor: schmacko
Datum: 21.12.07 22:19

Hallo,

oh Mann... da stand ich auf der Leitung.

Folgender Code liefert den Pfad:

Dim Pfad2 As String = Math.Truncate(TextBox1.Text / 1000) + 1
Dim Pfad1 As String = Math.Truncate(Pfad2 / 1000) + 1

If Pfad2.Length > 3 Then
Dim Nummer As Long = CType(Pfad2.Substring(Pfad2.Length - 3), Long) - 1
Pfad2 = CType(Nummer, String)
End If

MsgBox("d:\" & Pfad1 & "\" & Pfad2 & "\")

Aber wenn ich in die Textbox 999999 eingebe ist das Ergebnis
d:\2\-1 es müsste aber eigentlich d:\2\1 sein.
Woran könnte denn das liegen?

Gruß
Ralf
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Automatische Verzeichnisorganisation933schmacko11.12.07 20:29
Re: Automatische Verzeichnisorganisation610wincnc12.12.07 20:07
Re: Automatische Verzeichnisorganisation668schmacko12.12.07 23:01
Re: Automatische Verzeichnisorganisation587schmacko12.12.07 23:13
Re: Automatische Verzeichnisorganisation612schmacko21.12.07 19:40
Re: Automatische Verzeichnisorganisation597Melkor21.12.07 20:09
Re: Automatische Verzeichnisorganisation634schmacko21.12.07 22:19

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel