Aktuelle Zeit: 30.05.2020 23:25

Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ]




Ein neues Thema erstellen Auf das Thema antworten  [ 12 Beiträge ]  Gehe zu Seite 1, 2  Nächste
Autor Nachricht
 Betreff des Beitrags: Verknüpfung Speichern & Lesen?
BeitragVerfasst: 03.03.2020 16:02 
Offline
Benutzeravatar

Registriert: 15.11.2010 10:56
Hallo Leute,

möchte meine Velindos Pfad(zb.C:\Windows oder "https://www.msn.com/de-de?inst=4&AR=8") als Verknüpfung speichern und bzw. lesen!

Hab die Sache mit "WriteString(0, Pfadfile$ )" versucht, funzt aber nicht!

Gruss ... Velindos!

_________________
Windows 7/8/8.1/10 (32/64-Bit) |Ubuntu 10.4 (64-Bit) |Purebasic 5.43 LTS (32/64-Bit)


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Verknüpfung Speichern & Lesen?
BeitragVerfasst: 03.03.2020 23:01 
Offline
Benutzeravatar

Registriert: 01.04.2007 20:18
Uralt, funzt aber glaub ich noch.... viewtopic.php?p=46694#p46694

_________________
PureBasic 5.72 LTS (Windows x86/x64) | Windows10 Pro x64 | Z370 Extreme4 | i7 8770k | 32GB RAM | iChill GeForce RTX 2080 Super | HAF XF Evo​​


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Verknüpfung Speichern & Lesen?
BeitragVerfasst: 04.03.2020 14:58 
Offline
Benutzeravatar

Registriert: 15.11.2010 10:56
Hallo Bisonte,
Danke für den Tip, finde aber nichts mit speichern!

Gruss ... Velindos!

_________________
Windows 7/8/8.1/10 (32/64-Bit) |Ubuntu 10.4 (64-Bit) |Purebasic 5.43 LTS (32/64-Bit)


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Verknüpfung Speichern & Lesen?
BeitragVerfasst: 05.03.2020 18:01 
Offline
jaAdmin
Benutzeravatar

Registriert: 13.09.2004 17:48
den Part Verknüpfung schreiben hab ich mal mit externer Hilfe gelöst


nircmd oder nircmdc von nirsoft https://www.nirsoft.net/utils/nircmd.html
kann sowas

über das OS tue ich mich da auch schwer und ich brauchte ne Lösung
hab das dann per runprogram aufgerufen

_________________
‮pb aktuell5.7 - windoof aktuell und sowas von 10
Ich hab Tinnitus im Auge. Ich seh nur Pfeifen.


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Verknüpfung Speichern & Lesen?
BeitragVerfasst: 05.03.2020 23:11 
Offline
Benutzeravatar

Registriert: 11.08.2005 19:08
Hier habe ich auch noch ein Include zum Lesen von Verknüpfungen (unterstützt auch Unicode): GetShellLinkTargetPath

URLs unterstützt dieses Include jedoch noch nicht, wie ich festgestellt habe.
Vielleicht finde ich am Wochenende Zeit, um das Include zu erweitern, damit URLs und das Erstellen von Verknüpfungen unterstützt wird.

_________________
Bild
Warum OpenSource eine Lizenz haben sollte
PureBasic-CodeArchiv-Rebirth: Git-Repository / Download – Jede Hilfe ist willkommen!
Manjaro Xfce x64 (Hauptsystem) :: WindowsXP/Xubuntu x86 (VirtualBox) :: PureBasic (Linux: x86/x64, Windows: x86) :: jeweils neueste Version


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Verknüpfung Speichern & Lesen?
BeitragVerfasst: 05.03.2020 23:25 
Offline
Benutzeravatar

Registriert: 23.07.2011 02:08
.url sind nur textdateien (ini format) oder geht's um was anderes?

_________________
Signatur und so


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Verknüpfung Speichern & Lesen?
BeitragVerfasst: 06.03.2020 13:06 
Offline
Benutzeravatar

Registriert: 29.08.2004 08:37
Derren hat geschrieben:
.url sind nur textdateien (ini format) oder geht's um was anderes?

Vermutlich eher um .lnk Dateien, z.B. Verknüpfungen auf Programme auf dem Desktop o.ä.

_________________
Angenommen es gäbe einen Algorithmus mit imaginärer Laufzeit O(i * n), dann gilt O((i * n)^2) = O(-1 * n^2) d.h. wenn man diesen Algorithmus verschachtelt ist er fertig, bevor er angefangen hat.


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Verknüpfung Speichern & Lesen?
BeitragVerfasst: 06.03.2020 13:54 
Offline
Benutzeravatar

Registriert: 23.07.2011 02:08
Joah, aber .lnk kann er ja schon erstellen, aber URLs werden nicht unterstützt.

Wenn man in Windows eine Verknüpfung erstellt (Rechtsklick auf Desktop/Ordner --> Neu --> Verknüpfung), wird geprüft ob es sich um eine URL handelt, oder um den Pfad zu einem Programm/Datei etc.
Dann wird entweder eine .url oder eine .lnk erstellt.
Die .url lässt sich einfach selber lesen und schreiben.

_________________
Signatur und so


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Verknüpfung Speichern & Lesen?
BeitragVerfasst: 06.03.2020 14:17 
Offline
Benutzeravatar

Registriert: 10.09.2004 09:59
Code:
Procedure CreateShellLink(FileName$, Link$, Argument$, Description$, WorkingDirectory$ = "")
   Protected ppf.IPersistFile, Result, R2
   CompilerIf #PB_Compiler_Unicode
      Protected psl.IShellLinkW
   CompilerElse
      Protected psl.IShellLinkA
   CompilerEndIf
   
   CoInitialize_(0)
   CompilerIf #PB_Compiler_Unicode
      R2 = CoCreateInstance_(?CLSID_ShellLink, 0, 1, ?IID_IShellLinkW, @psl)
   CompilerElse
      R2 = CoCreateInstance_(?CLSID_ShellLink, 0, 1, ?IID_IShellLinkA, @psl)
   CompilerEndIf
   
   If R2 = #S_OK
      psl\SetPath(FileName$)
      psl\SetArguments(Argument$)
      psl\SetWorkingDirectory(WorkingDirectory$)
      psl\SetDescription(Description$)
      psl\SetShowCmd(#SW_SHOWNORMAL)
      psl\SetHotkey(#Null)
      psl\SetIconLocation(FileName$, 0)
      
      If psl\QueryInterface(?IID_IPersistFile, @ppf) = #S_OK
         If ppf\Save(Link$, #True) = #S_OK
            Result = #True
         EndIf
         ppf\Release()
      EndIf
      psl\Release()
   EndIf
   CoUninitialize_()
   
   ProcedureReturn Result
   
   DataSection
      CLSID_ShellLink:
      ;00021401-0000-0000-C000-000000000046
      Data.l $00021401
      Data.w $0000, $0000
      Data.b $C0, $00, $00, $00, $00, $00, $00, $46
      IID_IShellLinkA:
      ;DEFINE_SHLGUID(IID_IShellLinkA,         0x000214EEL, 0, 0);
      ;C000-000000000046
      Data.l $000214EE
      Data.w $0000, $0000
      Data.b $C0, $00, $00, $00, $00, $00, $00, $46
      ;IID_IShellLinkW {000214F9-0000-0000-C000-000000000046
      IID_IShellLinkW:
      Data.l $000214F9
      Data.w $0000, $0000
      Data.b $C0, $00, $00, $00, $00, $00, $00, $46
      IID_IPersistFile:
      ;0000010b-0000-0000-C000-000000000046
      Data.l $0000010b
      Data.w $0000, $0000
      Data.b $C0, $00, $00, $00, $00, $00, $00, $46
   EndDataSection
EndProcedure

CreateShellLink("C:\Windows", GetUserDirectory(#PB_Directory_Desktop) + "Velindos.lnk", "", "Link to Windows folder")



_________________
Link tot?
Ändere h3x0r.ath.cx in hex0rs.coderbu.de und alles wird gut.


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Verknüpfung Speichern & Lesen?
BeitragVerfasst: 09.03.2020 09:18 
Offline
Benutzeravatar

Registriert: 15.11.2010 10:56
Hallo Leute,
Danke für eure Vorschläge! Nun das mit dem *.lnk ist klar.

Mein Problem ist das ich einen Url ablegen möchte. Der Tip

Zitat:
.url sind nur textdateien (ini format) oder geht's um was anderes?


habe ich befolgt, nur funzt nicht! Habe Sie als Textdatei gespeichert ...

Code:
; SCHREIBEN der URL
#Datei = 0
MessageRequester("PureBasic", "Welcome !"+Chr(13) + "PureBasic will write a url named: PureBasicTestFile.url", 0)
; If CreateFile(#Datei, "C:\Users\MEDION\Desktop\PureBasicTestFile.url")
If OpenFile(#Datei, "C:\Users\MEDION\Desktop\PureBasicTestFile.url")
  WriteString(#Datei,"[InternetShortcut]"+Chr(13)+"URL=https://www.purebasic.fr/german/viewtopic.php?f=16&t=31889",#PB_Ascii)
  CloseFile(#Datei)
Else
  MessageRequester("PureBasic", "Error: can't write the url", 0)
  End
EndIf


und gelesen

Code:
; LESEN der URL
If ReadFile(0, "C:\Users\MEDION\Desktop\PureBasicTestFile.url")
 
  First$ =  Trim(ReadString(0))
  MessageRequester("PureBasic", "Line read: "+First$, 0)
  First$ =  Trim(ReadString(0))
  MessageRequester("PureBasic", "Line read: "+First$, 0)
 
  CloseFile(0)
Else
  MessageRequester("PureBasic", "Error: Can't read the file", 0)
EndIf
End


Wenn ich die Sache mit dem Notepad speichere erkennt er den url.

Gruss ... Velindos!

_________________
Windows 7/8/8.1/10 (32/64-Bit) |Ubuntu 10.4 (64-Bit) |Purebasic 5.43 LTS (32/64-Bit)


Nach oben
 Profil  
Mit Zitat antworten  
Beiträge der letzten Zeit anzeigen:  Sortiere nach  
Ein neues Thema erstellen Auf das Thema antworten  [ 12 Beiträge ]  Gehe zu Seite 1, 2  Nächste

Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ]


Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 1 Gast


Sie dürfen keine neuen Themen in diesem Forum erstellen.
Sie dürfen keine Antworten zu Themen in diesem Forum erstellen.
Sie dürfen Ihre Beiträge in diesem Forum nicht ändern.
Sie dürfen Ihre Beiträge in diesem Forum nicht löschen.

Suche nach:
Gehe zu:  

 


Powered by phpBB © 2008 phpBB Group | Deutsche Übersetzung durch phpBB.de
subSilver+ theme by Canver Software, sponsor Sanal Modifiye