Hoşgeldin, Ziyaretçi
Sitemizden yararlanabilmek için Kayıt olmalısınız.

Kullanıcı Adınız:
  

Şifreniz:
  





Forum İstatistikleri
» Toplam Üyeler: 91.800
» Son Üye: Fatih Mehmet Aldemir
» Toplam Konular: 18.517
» Toplam Yorumlar: 135.188

Detaylı İstatistikler

Son Aktiviteler
Aynı Numaranın Tekrarını ...
Yazar: sormaneden07
10 saat önce
Raporda Satırbaşı Nasıl E...
Yazar: furens
11 saat önce
Hesaplama Hk.
Yazar: serkan1985
Bugün, 01:15
Like Kullanımı Hakkında A...
Yazar: ozanakkaya
Dün, 22:52
Access Veri Aktarımı Şifr...
Yazar: erdal21
Dün, 21:06
Onay Kutusu
Yazar: metin02
Dün, 20:39

 
  Ek Ders Geri Ödeme Programı
Yazar: gok_han - 26/07/2017, 16:24 - Forum: Access Örnekleri ve Uygulamaları - Yorumlar (1)

Slm Arkadaşlar;

Okullarda personelin fazla yatan ek ders ile ilgili ufak bir program hazırladım işinize yarar umarım.

Ek Dosyalar
.rar   EGÖP V1 PROGRAMI.rar (Dosya Boyutu: 39,47 KB / İndirme Sayısı: 27)
Bu konuyu yazdır

  Özel Öğretim Kursu Programı
Yazar: biberli33 - 15/07/2017, 22:14 - Forum: Access Örnekleri ve Uygulamaları - Yorumlar (1)

Arkadaşlar, bir yakınımın Özel Öğretim Matematik Kursunda kullanması için basit bir program yapıyordum. Ortakları istemeyince üzerinde çalışmayı bıraktım. Program %80 oranında bitti ana konuları tamamladım. Sadece raporlama kaldı. Bilgim dahilinde farklı sorunları farklı yöntemlerle çözmeye çalıştım belki kulağımı tersten tuttum bilemiyorum ama bu sayede çok şey öğrendim. Program başka amaçlarla kullanılabilir. Sizlere faydası olacağını düşünüyorum. Herkese kolay gelsin.

Yönetici paneli şifresi sistem saatinin dakika ve saati. Saat 22:01 ise Şifre 0122. (Yönetici Paneli Şifre kodları alıntıdır)
Shift tuşu ve Sağ tık menüsü engelleme kodlarını eklememiştim bilginize.

Ek Dosyalar
.rar   EminA - 09.07.2017 - Emin.rar (Dosya Boyutu: 139,2 KB / İndirme Sayısı: 18)
Bu konuyu yazdır

  Form Üzerindeki Buton İle Otomatik Mail Gönderme
Yazar: fguveli - 15/07/2017, 17:03 - Forum: Access Örnekleri ve Uygulamaları - Yorumlar (1)

Herkese merhaba,

Excelden veri aldıktan sonra Access aracılığıyla form üzerine tanımlı butonla herkese email göndermek istiyorum.

Sorun şu:

Butona formu ilerletme komutu tanımlamama rağmen sürekli aynı formdaki bilgilere mail göndermek istiyor. Formdaki bilgileri sonraki kullanıcı için değiştirmekte sorun yaşıyorum.

Vba olarak başlangıç seviyesinde bilgiye sahibim çok basit bir hata ise kusura bakmayın Img-cray

Edit: Konu yanlış yere olmuş ama taşıyamadım bir türlü. Bulabilirsem taşımayı taşıyacağım.

Visual Basic Code
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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
Public Sub Komut15_Click()
    Dim oApp As New Outlook.Application
    Dim oemail As Outlook.MailItem
    Dim fileName As String, todaydate As String
    
    
    Dim db As DAO.Database
    Dim rs As DAO.Recordset
    
        Set db = CurrentDb
    Set rs = db.Openrecordset("SELECT Ad, Soyad, Email, Limit, Adres FROM Musteriler Sorgu")
    
    Do Until rs.EOF
    
    On Error Resume Next
    DoCmd.GoToRecord , , acNext
    
  
    
        'Raporu müşteri bazında olması için düzenliyoruz
    
         DoCmd.OpenReport "MusteriRaporu", acViewReport, "", "[Forms]![MusteriFormu]![Ad]=[Musteriler]![Ad]", acNormal
    
    
        'Raporu pdf file olarak dışa aktarıyoruz
        todaydate = Format(Date, "DDMMYYYY")
        fileName = Application.CurrentProject.Path & "\MusteriRaporu_" & todaydate & ".pdf"
        DoCmd.OutputTo acReport, "MusteriRaporu", acFormatPDF, fileName, False
    
    
    
        Set oemail = oApp.CreateItem(olMailItem)
        oemail.To = rs.Fields("Email")
        oemail.Subject = Me.Firma_Adı & " Bakiye Raporu"
        oemail.Body = "Bakiye raporunuz ektedir."
        oemail.Attachments.Add fileName

        
        With oemail
            If Not oemail.To <> Me.Email Then
                .Send
                MsgBox "Email Gonderildi"
        
            Else
                MsgBox "Mail adresi hatalı!"
            
            End If
        
        End With
     rs.MoveNext
   
    On Error Resume Next
    DoCmd.GoToRecord , , acNext

    Loop
        
    
    rs.Close

    Set rs = Nothing
    Set db = Nothing
  

  
End Sub

Bu konuyu yazdır

  Md5 Şifreleme Örneği
Yazar: serkandiker - 10/07/2017, 12:32 - Forum: Access Örnekleri ve Uygulamaları - Yorum Yok

Arkadaşlar verilerinizi md5 şifreleme ile kullanmak için örnek uygulama paylaşmak istedim.Özellikle veritabanı web sayfası ile ortak kullanacak olursanız ihtiyacınız olabilir.

Ek Dosyalar
.rar   md5 key.rar (Dosya Boyutu: 35,48 KB / İndirme Sayısı: 16)
Bu konuyu yazdır


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.