Username der schreibgeschützten DAtei

Bild

Betrifft: Username der schreibgeschützten DAtei
von: Alex
Geschrieben am: 05.12.2003 08:51:25

Hallo Forum,

wenn ich eine Datei schreibgeschützt öffne möchte ich mittels VBA den Benutzernamen (die Person die im Moment die Datei geöffnet hat)auslesen und dann übers Netz eine Nachricht senden.
Nachrcht senden hab ich mir gedacht mache ich über
Net send Benutzernamen ..........

Bild


Betrifft: AW: Username der schreibgeschützten DAtei
von: mischa richter
Geschrieben am: 05.12.2003 17:13:29

geht nicht, da es zwei verschiedene sachen sind.
net send schickt eine msg an den PC-Namen,
der UserName der Datei aus MS-Excel kann ganz anders lauten.

evtl. hilft dir folgendes was:
lass die excel-datei beim öffnen eine externe txt-datei mit dem PC-Namen anlegen:
API:
Declare Function GetComputerName& Lib "kernel32" Alias _
"GetComputerNameA" (ByVal lbbuffer As String, nSize As Long)


Private Function CptName() As String
  Dim sTxt As String * 64
  Dim tmp As Variant
  tmp = GetComputerName(sTxt, 64)
  CptName = Left(sTxt, 9)
End Function



diesen string dann mit open - print - close speichern ...
und jetzt kannste diese manuell auslesen und dann mit NetSend was machen.

Mischa


Bild

Beiträge aus den Excel-Beispielen zum Thema " Username der schreibgeschützten DAtei"