Zuviel Werbung? - > Hier kostenlos beim SPS-Forum registrieren

Ergebnis 1 bis 7 von 7

Thema: feststellen, ob datei geöffnet unter visual basic script

  1. #1
    Registriert seit
    30.03.2005
    Beiträge
    239
    Danke
    22
    Erhielt 2 Danke für 2 Beiträge

    Standard


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    hallo,

    habe ein problem:

    muss mit visual basic script (bestandteil meiner winCCflex visualisierung) feststellen, ob eine datei (blöde excel datei, die auch von anderen systemen verwendet wird) schon geöffnet ist oder nicht. Ist sie noch nicht geöffnet, öffne ich sie im script, andernfalls warte ich halt bis sie wieder geschlossen wurde. ich habs mal einfach mit öffnen probiert und dann mit err.number probiert, leider ohne erfolg. (bin allerdings ne zeimliche vb-nulpe)
    Weiss jemand wie ich das rausfinden kann? Oder hat jemand eine idee, wie zwei leute gemeinsam auf die datei zugreifen können?

    gruß und dank im vorraus
    Zitieren Zitieren feststellen, ob datei geöffnet unter visual basic script  

  2. #2
    Registriert seit
    20.06.2003
    Ort
    Sauerland.NRW.Deutschland
    Beiträge
    4.850
    Danke
    78
    Erhielt 800 Danke für 543 Beiträge

    Standard

    das geht so

    Code:
    on error resume next
    Set fs = CreateObject("Scripting.FileSystemObject")
    
    Set TextFile = fs.openTextFile("e:\error.txt", 8)
    fehler=err.number
    msgbox fehler
    textfile.close
    ist die datei z.b. durch excel geöffnet wird der fehler 70 (zugriff verweigert) zurückgegeben.
    .
    mfg Volker .......... .. alles wird gut ..

    =>Meine Homepage .. direkt zum Download

    Meine Definition von TIA: Total Inakzeptable Applikation

  3. #3
    Avatar von mertens2
    mertens2 ist offline Erfahrener Benutzer
    Themenstarter
    Registriert seit
    30.03.2005
    Beiträge
    239
    Danke
    22
    Erhielt 2 Danke für 2 Beiträge

    Standard

    funktioniert das auch mit einer geöffneten xls-datei?

    gruß und dank
    Zitieren Zitieren habe aber keinen txt-file...  

  4. #4
    Registriert seit
    20.06.2003
    Ort
    Sauerland.NRW.Deutschland
    Beiträge
    4.850
    Danke
    78
    Erhielt 800 Danke für 543 Beiträge

    Standard

    sicher. ich habe obige txt in excel geöffnet und das script liefert dann fehler 70.
    .
    mfg Volker .......... .. alles wird gut ..

    =>Meine Homepage .. direkt zum Download

    Meine Definition von TIA: Total Inakzeptable Applikation

  5. #5
    Avatar von mertens2
    mertens2 ist offline Erfahrener Benutzer
    Themenstarter
    Registriert seit
    30.03.2005
    Beiträge
    239
    Danke
    22
    Erhielt 2 Danke für 2 Beiträge

    Standard

    hab das skript mal so übernommen. erstmal danke. sieht bei mir wie folgt aus:

    fname="d:\exelfile.xls"
    On Error Resume Next
    Set fso=CreateObject("scripting.filesystemobject")
    Set textfile=fso.openTextFile(FName,

    SmartTags("Datenaustausch\EnoW")=Err.Number
    textfile.close
    On Error GoTo 0

    Leider bleibt die Err.Number auf null, auch wenn exelfile.xls bereits geöffnet ist. Noch eine Idee, woran das liegen könnte?
    Zitieren Zitieren leider kein erfolg  

  6. #6
    Avatar von mertens2
    mertens2 ist offline Erfahrener Benutzer
    Themenstarter
    Registriert seit
    30.03.2005
    Beiträge
    239
    Danke
    22
    Erhielt 2 Danke für 2 Beiträge

    Standard

    ja, vielen, vielen dank volker. es funktioniert. war nur ein tippfehler im script!
    Zitieren Zitieren das geht!!!!!!!!!!!!!!!!!!  

  7. #7
    Registriert seit
    01.05.2009
    Beiträge
    74
    Danke
    0
    Erhielt 0 Danke für 0 Beiträge

    Standard


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    Wo ist den der Tippfehler loool ??

    Weil bie mir bleibt errnumber auch auf 0


    Edit:

    hab mal fs.opentextfile ( fname, forwriting) geschrieben. Dann liefert mir das die Fehlernummer 70
    Geändert von santero (30.03.2011 um 10:59 Uhr)

Ähnliche Themen

  1. OPC XML-DA und Visual Basic
    Von magmaa im Forum Hochsprachen - OPC
    Antworten: 18
    Letzter Beitrag: 14.05.2010, 09:34
  2. Script - Visual Basic?
    Von 1schilcher im Forum HMI
    Antworten: 1
    Letzter Beitrag: 16.01.2007, 10:28
  3. OPC und Visual Basic 6
    Von Daredevil im Forum Hochsprachen - OPC
    Antworten: 1
    Letzter Beitrag: 08.03.2005, 08:00
  4. OPC und Visual Basic 6
    Von Daredevil im Forum Hochsprachen - OPC
    Antworten: 0
    Letzter Beitrag: 05.03.2005, 19:59
  5. Visual Basic.Net
    Von Hamster im Forum Hochsprachen - OPC
    Antworten: 3
    Letzter Beitrag: 11.10.2004, 09:48

Lesezeichen

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •