Einzelnen Beitrag anzeigen

DirkH

Registriert seit: 28. Jan 2004
9 Beiträge
 
#1

Auf Excel Tabelle, die auf nem Server liegt zugreifen ?

  Alt 28. Jan 2004, 11:24
Hallo, ich hätte mal eine Frage,

ich würde ganz gerne auf eine Exceltabelle, die auf einem Server im LAN liegt zugreifen.
Wie bekomme ich das hin?
Ein Teil des Programmes sieht momentan so aus:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  WorkBk: _WorkBook; // WorkBook deklarieren
  WorkSheet: _WorkSheet; // WorkSheet deklarieren
  XLApp: TExcelApplication;
  _lcid: LCID;
begin
  _lcid := GetUserDefaultLCID;
  XLApp := TExcelApplication.Create(Self);
  try
    XLApp.Connect;
    try
      // WorkBooks zur ExcelApplication hinzufügen
      XLApp.Workbooks.Open('\\170.136.77.35\test\test.xls', emptyParam, emptyParam,
        emptyParam, emptyParam, emptyParam, emptyParam, emptyParam,
        emptyParam, emptyParam, emptyParam, emptyParam, EmptyParam,
        _lcid); // WorkBooks zur ExcelApplication hinzufügen
      WorkBk := XLApp.WorkBooks.Item[1]; // erstes WorkBook auswählen
      WorkSheet := WorkBk.WorkSheets.Get_Item(strtoint(Edit1.text)) as _WorkSheet;
      ShowMessage(Worksheet.Cells.Item[(strtoint(Edit2.Text)), (strtoint(Edit3.Text))].Value);
    finally
      XLApp.Disconnect;
    end;
  finally
    XLApp.Quit;
  end;
end;

Nun weiss ich nicht, wie ich die Verbindung zu dem Server hinbekommen kann ;(
Es geht ja nun mehr oder weniger nur um:
XLApp.Workbooks.Open('\\170.136.77.35\test\test.xls', .... ); wenn ich die Tabelle lokal, also
XLApp.Workbooks.Open('c:\test\test.xls', .... ); anspreche, klappt das alles.
Nun weiss ich wie gesagt nicht, wie ich die auf dem Server ansprechen soll/kann. Welche Komponenten ich dafür brauche, usw...

Ich hoffe es kann mir hier jemand helfen.

Ach ja, ich nutze Delphi7 Enterprise und Office 2000

Danke schon mal im Vorraus, DirkH
  Mit Zitat antworten Zitat