Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Access'te sql veritabanlı sohbet programı tablo yok sorgu yok - chat :)
#1
Merhaba,
Bu sohbet programında Access formları arayüz olarak kullanılmış database olarakta MS Sql server kullanılmıştır.

-Şimdilik programın gerçek çalışma şeklini göstermek için server olarak kendi bilgisayarımı kullanıyorum. Burda amaç siz programı MDE olarak çevirdiğinizde hiç bir tablo sorgu görmeden yani verilerin güvenliği sağlanmış halde nasıl bağlantı kurulup ve nasıl login sayfasında şifre ile giriş yapmadan verilere ulaşma imkanının bulunmadığını göstermek. Örneğin bu dosyayı mde olarak göndermiş olsaydım siz sadece login ile giriş yaparak görme yetkiniz olan yerleri görecektiniz. her istediğiniz verilere ulaşamayacaktınız.

-Tablolar ms Sql serverda bulunmaktadır.

-Sql ververe verebilmeniz için tabloları da ilişikte gönderiyorum. Sql servere vereceğiniz tablolarınızın yönetimi için Sql bölümünü inceleyiniz.

-Bu program sadece chat için değil diğer tüm yazılımlarınızda size verileriniz güvenliğini sağlamanıza ve güvenli şekilde programı çalıştırtmanızda yardımcı olacak bir nevi fikir verebilir.

-Bu programla bir bilgisayarı server olarak atayıp istenilen bilgisayar kadar ağ veya internet üzerinden programınızı kullandırmayı amaçlar. Örnek: Ankarada server olarak atanmış bilgisayarın Sql server'ında yüklü tablolara ülkenin her yanından kullanıcılara program yüklenmek şartıyla kullandırılabilir. Bu muhasebe programı da olabilir, insan kaynakları prg olabilir tüm yazılımlarda kullanılabilir.

-Biraz daha tecrübeli arkadaşlara hitap ediyor sanırım.

-Ayrıntılar gerektikçe burada, bu mesajda yazılmaya devam edilecektir.

Programdaki bir Özellikte ODBC veri kaynağında DSN olayını oluşturmuş olduğum kodlar ile kendi otomatik gerçekleştiriyor olması. Bu sayede ODBC veri kaynağı ile Sql server ile iletişime geçip istendiğinde bağlı tablo bile oluşturulabiliniyor.

odbc kayıt ve dsn oluşumuna örnek kod dökümü:

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
Function DoesTblExist(strTblName As String) As Boolean
On Error Resume Next
Dim db As Database, tbl As TableDef
Set db = CurrentDb
Set tbl = db.TableDefs(strTblName)
If Err.Number = 3265 Then 
DoesTblExist = False
Exit Function
End If
DoesTblExist = True
End Function

Function CreateODBCLinkedTables() As Boolean
On Error GoTo CreateODBCLinkedTables_Err
Dim strTblName As String, strConn As String
Dim db As Database, rs As Recordset, tbl As TableDef
' ---------------------------------------------
' şimdide odbc veri kaynağına kayıt oluyoruz.
' ---------------------------------------------
Set db = CurrentDb
DBEngine.RegisterDatabase "NCBBB", _
"SQL Server", _
True, _
"Description=AE" & _
Chr(13) & "Server=19.242.84.205\sqlexpress" & _
Chr(13) & "Database=ncmessenger"
' ---------------------------------------------
'odbc kaynağında oluşturulan dsn bilgileri ile ip numarası ve server adını kayıtlamış olduk.
' ---------------------------------------------
CreateODBCLinkedTables = True
'MsgBox "SQL Server İle Bağlantı Sağlandı.. Refreshed SQL ODBC Data Sources", vbInformation, "Sql Bağlantı"
CreateODBCLinkedTables_End:
Exit Function
CreateODBCLinkedTables_Err:
MsgBox Err.Description & "Bağlantı Yok! Sonra Tekrar Deneyin!", vbCritical, "Hata:"
Resume CreateODBCLinkedTables_End
End Function


Ayrıca program kullanıcıların kendi aralarında dosya transferleri yapmalarını da sağlayabiliyor. Ancak arka planda ftp bağlantıları yaparak dosya paylaşımlarını kullanıcıya bile hissettirmeden gerçekleştiriyor olması http ftp olayımızda fazla download upload olayı gerçekleştiriyor olmasından kota aşımına sebep oluyor. Bu nedenle şimdilik sadece şifreyi değiştirdim. Ancak siz isterseniz kendi ftp bilgilerinizi girerek kullanıcıların kendi aralarında dosya alışverişlerini yapmalarını sağlayabilirsiniz. ( Accesste kullanıcıların aynı anda birbirlerini dosya transferi olayı başka yerde yok Img-grin) )
selamlar.



Ek Dosyalar Ekran Görüntüleri
           

.rar   AccessTrChat5.rar (Dosya Boyutu: 683,2 KB / İndirme Sayısı: 273)
.rar   ServericinTablolar.rar (Dosya Boyutu: 268,9 KB / İndirme Sayısı: 257)
Cevapla
#2
Katkı paylaşımlarınız için teşekkürler. Maalesef rar dan çıkaramadım. Bu iş son zamanlarda sık olmaya başladı. saygılar...
Bilgi paylaşıldıkça çoğalır....
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.


Access için her zaman lazım olacak konu başlıkları listesi 


Cevapla
#3
dosya indirme sorunu genel..

bu arada programla ilgili resimleri ekleyeyim. çalışma şekli resimlerde görülebilir.


Ek Dosyalar
.rar   chat.rar (Dosya Boyutu: 288,41 KB / İndirme Sayısı: 120)
Cevapla
#4
benremix tarayıcını yükselt veya mozilla kullan düzeliyor.
mehmet ve ozan hocalarımla yazıştık gayet güzel .. Img-grin
Cevapla
#5
güzel çalışma için çok teşekkürler, dosya indirme sorununu sunucu ile görüştük, kullanıcının tarayıcısından kaynaklanan problem olabileceği, sunucudan kaynaklanmadığı belirtildi.

Tekrar teşekkürler
WWW
Cevapla
#6
Sn Cüneyt Bey hemen denedim gerçekten öyle oldu. Yalnız benim tarayıcı İe8 idi. Şimdi Google Chrome ve Firefox denedim ikisi de açtı. İlgi ve yardımlarınız için teşekkürler.

Saygılar..
Bilgi paylaşıldıkça çoğalır....
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.


Access için her zaman lazım olacak konu başlıkları listesi 


Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Bağlı Tablo Denetleme ozanakkaya 34 15.236 Dün, 09:39
Son Yorum: temre
  Ön Muhasebe Programı ve Birçok Özellik dayko 28 3.085 16/01/2017, 17:41
Son Yorum: atoz112
  İrsaliye Takip Programı emturker 33 9.680 07/01/2017, 23:35
Son Yorum: temre
  Basit Sigorta Acenta Poliçe Takip Programı dayko 13 2.887 07/01/2017, 17:21
Son Yorum: mustim1547
Information Gelir-Gider Programı bayFARUK 110 49.126 04/01/2017, 14:19
Son Yorum: atoz112



Konuyu Okuyanlar: 1 Ziyaretçi