Visual Basic 6.0 ve “Name Conflicts With Existing Module” hatası

Burak ŞEKERCİOĞLU    İlginç Bilgiler, Linkler, Visual Basic     vb6, vbp, Visual Basic 6.0

Belki sizin de başınıza gelmiştir. Program yazarken yeni bir component eklemek istediğinizde bu componentin mevcut olduğu ve yüklü olan aynı isimdeki bir component ile çakıştığını söyler, ne yapsanız bu modülü sisteme dahil edemezsiniz.

Ben de aynı sorun ile karşılaştım ve biraz kurcaladığımda VBP uzantılı proje dosyasının aslında TEXT özelliğinde bir dosya olduğunu gördüm bu dosyayı incelediğimde ise dosyanın ilk satırlarında aşağıdaki bilgilere ulaştım.

Type=Exe
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation
Reference=*\G{00000200-0000-0010-8000-00AA006D2EA4}#2.0#0#C:\Program Files\Common Files\System\ado\msado20.tlb#Microsoft ActiveX Data Objects 2.0 Library
Reference=*\G{56BF9020-7A2F-11D0-9482-00A0C91110ED}#1.0#0#C:\WINDOWS\system32\msbind.dll#Microsoft Data Binding Collection
Reference=*\G{CD000000-8B95-11D1-82DB-00C04FB1625D}#1.0#0#C:\WINDOWS\system32\cdosys.dll#Microsoft CDO for Windows 2000 Library
Object={48E59290-9880-11CF-9754-00AA00C00908}#1.0#0; msinet.ocx
Object={67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0; msadodc.ocx
Object={831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0; mscomctl.ocx
Object={F0D2F211-CCB0-11D0-A316-00AA00688B10}#1.0#0; msdatlst.ocx
Object={F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0; COMDLG32.OCX
Object={562E3E04-2C31-4ECE-83F4-4017EEE51D40}#8.0#0; todg8.ocx
Object={86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0; mscomct2.ocx

bu satırlarda dikkat edecek olursanız, Reference diye belirtilen satırların REFERENCES menüsünden eklenen referans kayıtlarının olduğunu ve OBEJCT satırlarında yer alan bilgilerinde aslında proje üzerinde yer alan COMPONENT olduğunu görebilirsiniz.

Bu dosyanın içerisinden sizin eklemek isteyip de ekleyemediğiniz bir component veya referans bilgisini silin ve dosyayı kaydedin.
Sonra aynı dosyayı VB6.0 ile açın ve eklemek istediklerinizi ekleyin.

Artık projeniz sorunsuz çalışacaktır.
Kolay gelsin.

Sekercioglu.eu Otomatik Postacı Yazılımı

Burak ŞEKERCİOĞLU    Linkler, Visual Basic     Automatic Mail Sender Free, Otomatik Mail Gönderici, Visual Basic 6.0

Yeni bir yazılım daha…

Geçtiğimiz günlerde bir ablamız grup mail gönderimlerinde outlook ile sorun yaşadığını söylediğinde böyle bir yazılım yapmak aklıma geldi fakat işlerimin yoğunluğundan dolayı el atıp olayı bitiremiyordum. Sonrasında yine sevdiğim bir başka ağabeyimiz de benden aynı konuda sorununu iletince bende bir an önce işlerimi rahatlatıp en basitinden kullanışlı bir yazılım yapmaya başladım.

Bu yazılım öyle çok komplike bir sisteme sahip değildir. Dosya eki filan göndermez ancak ilgili pencereye yazacak olduğunuz metni olduğu gibi adres listenizdeki kullanıcılara sorunsuzca ulaştırabilir.

Mail gönderimlerinde her seferinde 1 tane mail yolladığı için kimse kimlere gönderildiğini de göremez.

Bu kadar anlatım yeter sanırım, şimdi program kurulumuna başlayabiliriz.

Programı kurmak için http://www.sekercioglu.eu/?download=Sekercioglu%20Otomatik%20Mailci adresindeki programı indirip WINRAR programı ile açın (Eğer elinizde WINRAR yazılımı yoksa http://www.rarlab.com/rar/wrar380tr.exe adresinden indirebilirsiniz) ve bir klasöre dosyaları çıkartın

Setup.exe dosyasını çalıştırdığınızda aşağıdaki ekran gelecektir. Bu ekranda OK tuşuna basarak işleminize devam edebilirsiniz.

Gelecek olan aşağıdaki ekranda bilgisayar resmi olan butona basarak kurulum başlatılır.

ve Mail gönderim sisteminin yer alacağı Başlat -> Programlar içersindeki klasörü tanımlanarak CONTINUE tuşuna basılır.

ve programımız artık kurulmuş durumdadır.

bundan sonrasında ise programımızın çalışması için 1-2 temel tanım yapılmalıdır. Bunun için de;

1) Programın kurulu olduğu C:\Program Files\Otomatik Mail Gönderim Sistemi içersindeki alicilar.txt dosyasını açın

ve bu dosya içersine kimlere mesaj gönderilecekse adresler altalta gelecek şekilde yazın ve sonrasında dosyayı kayıt edip kapatınız.

Daha sonra yine C:\Program Files\Otomatik Mail Gönderim Sistemi içersindeki ayarlar.ini dosyasını açın

dosya içersindeki

SMTP değerinin karşısına mail gönderme sunucunuzu yazın.

SMTPPORT değeri mail gönderim sunucunuza bağlantı port numaranızdır.

KULLANICI değeri karşılığına mail adresinizi açık olarak yazınız

SIFRE değeri karşılığına mail adresinizin şifresini yazınız

KIMDEN değeri karşılığına Ad ve Soyadınızı yazınız

KONU değeri karşılığına ise gönderilecek olan maillerin konusunu yazınız. (Site Duyurusu vb. gibi)

daha sonra bu dosyayı KAYIT edin ve kapatınız.

Artık Programımızı kullanabilirsiniz. Bunun için yapmanız gereken tek şey Başlat-> Programlar -> Otomatik Mail Gönderim sistemi menüsüne girip programınızı çalıştırmak olacaktır.

Visual Basic 6.0 ve Microsoft Outlook Takvim Birlikte nasıl kullanılır? -2

Burak ŞEKERCİOĞLU    Visual Basic     Microsoft Outlook Calendar, Outlook.Application, Visual Basic 6.0

Önceki yazımda anlattığım gibi yine Microsoft Outlook ve Visual Basic 6.0 ile ortaklaşa çalışabilecek takvim özelliklerinden bahsetmek istiyorum.

Bir önceki yazıda sizin de bildiğiniz gibi Visual Basic 6.0 ile Microsoft Outlook yazılımı üzerinde TAKVİM verisi oluşturmuş ve bu bilgileri istediğimiz bir kullanıcının mail adresine göndermiştik.

Bu yazıda ise oluşturulmuş olan TAKVİM verileri arasından belirli bir bilgiyi sorgulayacak ve buna uyan TAKVİM kaydını sileceğiz.

Private Sub Command1_Click()
Const olFolderCalendar = 9
Set objOutlook = CreateObject(“Outlook.Application”)
Set objNamespace = objOutlook.GetNamespace(“MAPI”)
Set objFolder = objNamespace.GetDefaultFolder(olFolderCalendar)

Set colItems = objFolder.Items
konu = “[Subject] = ” & “‘Deneme'”
yer = “[Location] = ” & “‘ev'”
basla = “[Start] = ” & Chr(34) & “07.01.2009 08:00” & Chr(34)
bitis = “[End] = ” & Chr(34) & “07.01.2009 08:30″ & Chr(34)
sorgu = konu & ” AND ” & yer & ” AND ” & basla & ” AND ” & bitis

Set colFilteredItems = colItems.Restrict(sorgu)

For Each objitem In colFilteredItems
Set objPattern = objitem.GetRecurrencePattern

Debug.Print “Toplantı Adı: ” & objitem.Subject
Debug.Print “Süre: ” & objitem.Duration & ” minutes”
Debug.Print “Yer: ” & objitem.Location
Debug.Print “Başlangıç: ” & objitem.Start
Debug.Print “Bitiş: ” & objitem.End
Debug.Print
objitem.Delete
Next

End Sub

Yukarıdaki yordamdan da anlayacağınız gibi KONUSU Deneme olan, TOPLANTI YERİ ev olan, BAŞLANGIÇ TARİHİ 07.01.2009 ve saati 08:00 olan, BİTİŞ TARİHİ ise 07.01.2009 ve saati 08:30 olan kayıtları AJANDA içersinde sorgular ve bulduklarının detay bilgilerini DEBUG ekranında gösterip siler.