xsicex

NitroX Cleaner Mini Tool

Das kleine Programm kann Datenmüll finden und entfernen und eine Logdatei zu den gelöschten/analysierten Dateien erstellen.



Mehr Screenshots hier

Weiterleitung zur Webseite

NitroX Cleaner (inklusive EnergyTimer & Children Safety)-Download

NitroX Cleaner (Portable Version - ohne EnergyTimer & Children Safety)-Download

NitroX Cleaner Mini Tool (enthält nur den Cleaner!)-Download


Und hier noch einen VB Code von mir das in diesem Programm verwendet wird, welches erlaubt die Dateigrößen/Ordnergrößen zu addieren. Diese Funktion braucht man nur in einen Modul einfügen und kann sie anschließend überall im VB Projekt aufrufen nach dem Muster:
FileSizeAdd(Dateigröße1, Dateigröße2)

dabei muss Dateigröße1 ein String sein, wie z.B. "1 MB" und Dateigröße2 ebenfalls.
Möglich ist "X Byte", "X KB", "X MB", "X GB", "X TB" - (X stellt eine Zahl dar!)

Zitat:

Public Function FileSizeAdd(ByVal anzahl1 As String, ByVal anzahl2 As String) As String Dim file1 As Double Dim file2 As Double If anzahl1.Contains("TB" Then file1 = anzahl1.Replace("TB", "" file1 = (file1 * 1000 * 1000 * 1024 * 1024) ElseIf anzahl1.Contains("GB" Then file1 = anzahl1.Replace("GB", "" file1 = (file1 * 1000 * 1024 * 1024) ElseIf anzahl1.Contains("MB" Then file1 = anzahl1.Replace("MB", "" file1 = (file1 * 1024 * 1024) ElseIf anzahl1.Contains("KB" Then file1 = anzahl1.Replace("KB", "" file1 = (file1 * 1024) ElseIf anzahl1.Contains("Byte" Then file1 = anzahl1.Replace("Byte", "" End If If anzahl2.Contains("TB" Then file2 = anzahl2.Replace("TB", "" file2 = (file2 * 1000 * 1000 * 1024 * 1024) ElseIf anzahl2.Contains("GB" Then file2 = anzahl2.Replace("GB", "" file2 = (file2 * 1000 * 1024 * 1024) ElseIf anzahl2.Contains("MB" Then file2 = anzahl2.Replace("MB", "" file2 = (file2 * 1024 * 1024) ElseIf anzahl2.Contains("KB" Then file2 = anzahl2.Replace("KB", "" file2 = (file2 * 1024) ElseIf anzahl2.Contains("Byte" Then file2 = anzahl2.Replace("Byte", "" End If Dim ergebnis As Double Dim einheit As String ergebnis = (file1 + file2) einheit = "Byte" If ergebnis > 1024 Then ergebnis = (ergebnis / 1024) einheit = "KB" End If If ergebnis > 1024 Then ergebnis = (ergebnis / 1024) einheit = "MB" End If If ergebnis > 1000 Then ergebnis = (ergebnis / 1000) einheit = "GB" End If If ergebnis > 1024 Then ergebnis = (ergebnis / 1024) einheit = "TB" End If Return Math.Round(ergebnis, 2) & " " & einheit End Function

èíòåðíåò êàçèíî èãðàòü íà ÿíäåêñ äåíüãè éîøêàð îëà, îíëàéí êàçèíî ãðàíä 1 6.

ïîêåð èãðû èãðàòü íà äåíãè, èãðîâûå àâòîìàòû ãàìèíàòîð áåñïëàòíî îíëàéí.

ïîêåð ñêà÷àòü êíèãè èëè ïîêåð óêðàèíà òóðíèð!

èãðîâîé êëóá âóëêàí èãðàòü áåç ðåãèñòðàöèè, à òàêæå ïîêåð ñòàðñ äëÿ windows phone îíëàéí êàçèíî èãðîâûå àâòîìàòû áåç ðåãèñòðàöèè 2012 ïîêåð all in íà ïðåôëîïå.