vb ed access

Article View: free.it.visual-basic

Article #1050

Back to free.it.visual-basic Previous Next

#1050

From: Byte
Date: Tue, 11 Jan 2005 12:27

29 lines
1722 bytes

ho fatto un piccolo pgm in vb che lancia un applicazione access..   mi va in
errore dicendo che il file � gi� aperto in modo esclusivo... o che il file
access non esiste.

Il file access � esatto ed anche il persorso.....
di seguito metto il programmino vb che ho scritto...... cosa ho fatto di
sbalgiato???  Cosa vuol dire aperto in esclusivit� da altri  se lo utilizzo
solo io??

non sono esperto in Vb!!
  grazie a tutti

Private Sub Form_Load()

Dim objApp
Dim AppPath
Dim FileName
Dim DBName

AppPath = "c:\saripgm"
DBName = "db2.mdb"
Set objApp = CreateObject("Access.Application")
objApp.OpenCurrentDatabase AppPath & DBName
objApp.DoCmd.OpenReport "Stampa Fattura", acpreview
objApp.CloseCurrentDatabase
Set objApp = Nothing


End Sub

Technical Details

Message-ID: <OCPEd.671227$35.27165043@news4.tin.it>

Path:

arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!proxad.net!news.wiretrip.org!border2.nntp.ams.giganews.com!nntp.giganews.com!news-out.tin.it!news-in.tin.it!news4.tin.it.POSTED!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Thread: f94ee,db0804ac8b4872ab,start
X-Google-Attributes: gidf94ee,public
X-Google-Language: ITALIAN,ASCII
Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!proxad.net!news.wiretrip.org!border2.nntp.ams.giganews.com!nntp.giganews.com!news-out.tin.it!news-in.tin.it!news4.tin.it.POSTED!not-for-mail
From: "Byte" <sarinfo@tin.it>
Newsgroups: free.it.visual-basic
Subject: vb ed access
Lines: 31
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1437
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1441
Message-ID: <OCPEd.671227$35.27165043@news4.tin.it>
Date: Tue, 11 Jan 2005 12:27:26 GMT
NNTP-Posting-Host: 80.180.29.50
X-Complaints-To: "Please send abuse reports to abuse@tin.it and technical notifications to newsmaster@tin.it"
X-Trace: news4.tin.it 1105446446 80.180.29.50 (Tue, 11 Jan 2005 13:27:26 MET)
NNTP-Posting-Date: Tue, 11 Jan 2005 13:27:26 MET
Organization: TIN