CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

quakesanta Nybegynder

13. april 2007 - 13:47 Der er 3 kommentarer og
1 løsning

Visning af HD-plads

Jeg har et regneark med links til nogle beregningsmaskiner - og det fungerer fantastisk.

Men jeg har det problem at maskinerne med tiden bliver fyldt med data. For at kunne se hvor meget HD-plads der er tilbage skal jeg logge på med en fjernstyring (dameWare).

Er der en måde hvor jeg kan se hvor meget harddiskplads en given maskine (fx \\192.168.0.10\C\) har på c-drevet, via excel? Dataene må jo sendes på en måde, jeg får jo at vide hvor meget plads der er hvis jeg mapper C som et netværksdrev.

Det vil gøre det meget nemmere for mig at administrere hvis jeg har overblikket fra excel.

mvh Jens

Synes godt om

excelent Ekspert

13. april 2007 - 16:38 #1

Sub ShowFreeSpace()

Dim fs, d, s
drvPath = "C:\"
Set fs = CreateObject("Scripting.FileSystemObject")
Set d = fs.GetDrive(fs.GetDriveName(drvPath))
s = "Drive " & UCase(drvPath) & " - "
s = s & d.VolumeName & vbCrLf
s = s & "Free Space: " & FormatNumber(d.FreeSpace / 1024, 0)
s = s & " Kbytes"
MsgBox s

End Sub

Synes godt om

quakesanta Nybegynder

15. april 2007 - 23:35 #2

Jeg prøver det i morgen på arbejde - ked af jeg ikke har fået set det før, men har været i sommerhus weekenden over :-)
Men ved nærmere dissekering af koden virker det logisk, så smid et svar så får du nogle point dumpende mandag :-)

Synes godt om

quakesanta Nybegynder

16. april 2007 - 10:12 #3

Koden fik givet en ide til hvordan det kunne gøres, den endelige kode ser sådan ud:

Function ShowFreeSpace(drvPath) As Double
Dim fs, d, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set d = fs.GetDrive(fs.GetDriveName(drvPath))
s = FormatNumber(d.FreeSpace / 1024 * 0.000001, 1)
ShowFreeSpace = s
End Function

Excelent: hvis du smider et svar får du halvdelen, da det ikke var præcis det jeg skulle bruge

Synes godt om

quakesanta Nybegynder

06. december 2007 - 16:40 #4

så tager jeg pointne selv... hader at have spg. ude

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Excel kurser

Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Automatisk give specifikke point udfra placering Af jernrosen3 i Excel	5	19/12/202410:24	22/12/202413:14
Delvis udfyld en celle, baseret på en %-sats fra anden celle Af Brian Nielsen i Excel	2	16/12/202415:27	17/12/202422:03
Hjælp til formatering af excel ark. Af Nicholas i Excel	23	13/12/202412:32	18/12/202415:44
To x-akser men kun ét datasæt? Af TheLibrarian i Excel	1	10/12/202409:17	10/12/202410:35
Isolere en dato i tekst/tal Af jernrosen3 i Excel	7	09/12/202408:59	09/12/202410:38

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS

23/12

Historisk million-bøde får Region Syddanmarks it-direktør til at efterlyse nye GDPR-retningslinjer

23/12

Til næste år kommer iPhone 17 – og ifølge rygtestrømmene vil den byde på tre nyheder

23/12

En af verdens største it-distributører dropper samarbejdet med Broadcom: Kunne ikke nå til enighed

23/12

Ser med 'stor alvor' på problemer med vand, varme og manglende kontrol i politiets datacenter

23/12

Brugere rammes af Microsoft-fejl: M365-produkter er på mystisk vis blevet deaktiveret

23/12

Her er dommen: Region Syddanmark skal betale historisk stor bøde for grove overtrædelser af GDPR

23/12

Vores vidensindsamling og demokratiske samtale påvirkes af helt lukkede beslutninger i en enkelt privat virksomhed

23/12

Overblik: Danske it-selskaber strømmer ind mod den centrale storby - og det handler ikke om penge

23/12

Banebrydende ChatGPT-opdatering er lige på trapperne: “Denne model vil være helt fantastisk til programmering”

23/12

Tivoli søger ny CIO: Kenneth Hartvig stopper efter tre år på posten

23/12

Vi ender med at bo i en taber-region, hvis ikke vi gør noget drastisk - her er digitaliseringsministerens plan

Vis flere artikler

IT-JOB

Region Sjælland

Udvikler til Identity Management teamet i Koncern Digitalisering

KMD A/S

Senior Project Manager

KMD A/S

Senior Product Manager - IT Security

Sydbank

Data Engineer til Digital Banking

DSV

Senior Cloud Architect

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

I går 19:53	CD Burner XP (Sætte den til at optage nogle numre fra en CD - Men ikke alle ? Af Ikke-ekspert i Musik & videoafspillere
I går 17:42	Katastrofe med Pc Af LilBe i PC
I går 09:44	Mine emails kan pluselig ikke læses af modtagerne, kun uforståelige tal og bogstaver Af gunnarb i E-mail programmer
24/1216:03	Fjern "Seneste" - "Hurtig adgang" Fra Windows 11 - Hvordan ? Af Ikke-ekspert i Windows
23/1214:43	html <Input.. Danske bogstaver Af pjotre i Andet software