Du skal tilpasse de første 2 linier til dit specifikke ønske. Derudover kan du vælge at fjerne nogle af tællerne, hvis du KUN vil vide, hvor mange underNØGLER der er (og altså ikke vil vide noget om, hvor mange værdier, der er i disse nøgler)
Det virker på en XP-maskine, og sandsynligvis også på en Win2k maskine. Jeg er lidt mere usikker på tidligere styresystemer, men det vil i hvert fald kunne fixes, hvis det også ønskes.
Do While Not objTextFilein.AtEndOfStream sReadLine = objTextFilein.ReadLine If Left(sReadLine, 1) = "[" then subkey = subkey + 1 Elseif Left(sReadLine, 1) = chr(34) then value = value + 1 Elseif Left(sReadLine, 1) = "@" then defvalue = defvalue + 1 End If LineCount = LineCount + 1 Loop
OK - mange tak. Det havde jeg ikke tænkt på - og det virker glimrende. Jeg skulle bare lave nogle små tilføjelse for også at få navnene med på nøglerne. Men jeg undres over at WSH ikke har en kommando der direkt klarer en så simpel operation. Mit mål er at lave en script som jeg kan bruge til at sikre på et netværk at uanset hvor jeg logger på, den maskine jeg pt arbejder med vil, som standard, vælge den lokal printer hvis der findes en. Eksemplevis Corels gamle PerfectScript kan gøre det således:
Denne script går direkt ind og hente nøglerne fra regbasen og skriver den ønskede værdi ind ifølge de oplysninger den samle ind. Ingen behov for lægge oplysningen ud omkring en tekstfil for så at hente dem ind igen ad sammen vej. Men ak! Hvor er der et system som stadig har god gamle PS. Din ide er dog brugbare så tak for den igen.
Synes godt om
Ny brugerNybegynder
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.