- Katılım
- 11 Mart 2005
- Mesajlar
- 3,058
- Excel Vers. ve Dili
- Office 2013 İngilizce
Merhaba,
ADO bağlantısı ile wifi ağındaki paylaşılmış bir dosyayı diğer makineden bilgi çekmeye çalışırken; gidiyor dosyanın kendisini salt okunur olarak açıyor;
sebebini bir türlü anlayamadım;
iyi çalışmalar.
ADO bağlantısı ile wifi ağındaki paylaşılmış bir dosyayı diğer makineden bilgi çekmeye çalışırken; gidiyor dosyanın kendisini salt okunur olarak açıyor;
sebebini bir türlü anlayamadım;
iyi çalışmalar.
Kod:
myFile = ""\\192.168.1.119\Barkod-1\Barkod.xlsm""
If Con.State = 1 Then Con.Close
Con.Open "provider=microsoft.ace.oledb.12.0;data source=" & _
myFile & ";extended properties=""Excel 12.0;Readonly=1;hdr=yes"""
sorgu = "Select [Ürün Kodu], [Ürün Adı], Sum([Adet]) AS TOPLAM,'" & AC & "' AS [RAPOR NO] from[Barkod$] " & _
" Group By [Ürün Kodu]"
Set RS = Con.Execute(sorgu)