I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
jeg kender godt replace funktioenen. jeg fik formidlet mig lidt forkert.. men det er ligemeget da jeg har fundet ud af at det ikke kan lade sig gøre.. noget med at køre shell for at starte et program op med parametrer. men parametrerne fungerer kun hvis der ikke er mellemrum i den sti som skal være i en af parametrerne
Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal lBuffer As Long) As Long
Public Function GetShortPath(strFileName As String) As String Dim lngRes As Long, strPath As String strPath = String$(165, 0) lngRes = GetShortPathName(strFileName, strPath, 164) GetShortPath = Left$(strPath, lngRes) End Function
Private Sub Form_Load() MsgBox GetShortPath("C:\Programmer") End Sub
Hejsa Sunep du kan bruge koden chr$(32) og skal du bruge flere efter hinanden kan du bruge koden space$(x) hvor x er de antal tomme pladser du skal bruge. fx. if tekst =" " then tekst=chr$(32) 'Her er der en tom plads eller if tekst= " " then tekst = space$(10) ' Her er der 10 tomme pladser
\blady
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.