sorry sudah bisa nih, dapet dari: http://support.microsoft.com/kb/238245
On 11/6/07, Martin Zhang 張小明 <[EMAIL PROTECTED]> wrote: > > saya ada file di server (\\ServerPusat\Report\SalesDetail.xls) > > bagaimana meng-ekselusi file tersebut.. > saya sudah menggunakan coding sbb: > > '=============================== > Private Declare Function ShellExecute Lib " shell32.dll" Alias > "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal > lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, > ByVal nShowCmd As Long) As Long > > Const SW_SHOWNORMAL = 1 > dim mPath as string > > > > Private Sub CmdRptSalesDetail_Click() > mPath = "\\ServerPusat\Report\SalesDetail.xls" > ShellExecute Me.hwnd, vbNullString, mPath, vbNullString, "C:\", > SW_SHOWNORMAL > End Sub > '==================================== > > tidak ada hasil, pdhl file mPath sudah ada & benar. > tetapi jika mPath berada di direktori komputer lokal (C:\Report\ > SalesDetail.xls) > bisa melakukan eksekusi file tersebut, sehingga file Excel terbuka melalui > syntax VB ShellExecute. > > Mohon pencerahan, > bagaimana cara utk meng-eksekusi mPath yg berada di > \\ServerPusat\Report\SalesDetail.xls > > terima kasih > > -- > ~orang awam~ -- ~orang awam~ [Non-text portions of this message have been removed]
