güncelleştirma sorgusu oluşturma

[selcukkahya]

Arkadaşlar merhaba

Firma bilgileri girdiğim formda firma ismi alanındaki verileri ana formumda firma1 , firma 2 ve firma 3 alanlarında seçebiliyorum.Fakat firma bilgileri formunda firma isminde değişiklik yaptığımda ana formumdaki firma 1, firma 2 ve firma 3 alanlarındaki firma isimlerini güncelleyemiyorum.

Bu konuda güncelleştirme yapabilirim.

ekteki dosyada da anlatmaya çalıştım.

yardımcı olabilirseniz çok sevinirim.

çok teşekkürler.

 

[selcukkahya]

Arkadaşlar bu konuda yardımcı olabilecek yok mu acaba

teşekkürler

 

[mehmetdemiral]

Sayın Selçuk Kahya,
Firma bilgilerindeki değişikliğin, combo box'dan tekrar seçmek zorunda kalmadan mı güncellenmesini istiyorsunuz. Tam anlayamadım. Çünkü değişiklik yaptıktan sonra tekrar comboya bakarsanız verinin güncellendiğini göreceksiniz. Ama sizin daha önce seçtiğiniz firma ile ilgili bilgiler. tekrar seçilene kadar orda durur. Onları da otomatik olarak değiştirmek mi istiyorsunuz?

 

[selcukkahya]

Sayın Mehmet Demiral

Aslında 1.olarak

Firma Bilgileri ekranından Firma Adı alanında değişiklik yaptıktan sonra otomatik olarak ana ekrandaki combo box ta bulunan firma isimlerinin otomatik olarak değişmesini istiyorum fakat benim gördüğüm kadarıyla değişmiyor. (


2.olarak

birde bunu sorgu kullanarak buton yardımıyla değişiklikleri düzletmek istiyorum.
güncelleştirme sorgusu kullanrak

böyle bir şey yapmak mümkün mü?

teşekkürler

 

[selcukkahya]

Arkadaşlar merhaba

yardımcı olabilecek yok mu bana acaba

teşekkürler

 

[modalı]

Sayın selcukkahya,

frmFirma formuna şu kodu ekleyin:

Private Sub Form_Close()
DoCmd.OpenForm "tblSiparisMenu", , , , , acDialog
Me.Requery
End Sub

Neyi ne zaman güncellemeyi istiyorsunuz?

İyi çalışmalar

 

[selcukkahya]

Sayın Modalı

tekrar teşekkürler bu konuyla da ilgilendiğiniz için.

Ekteki dosyada da açıklamaya çalıştım ama;

şöyleki,
Basit bi deyişle FİRMA ADI alanında sonradan yapmış olduğum değişikliğin dropbox ta kendiliğinden değişmesini istiyorum veya programı kapatıp açtıktan sonra düzelmiş olarak gelmesini istiyorum.Çünkü alt tarafta seçili firmaya ait combo box işaretini kaldırıp tekrar işaretlediğinizde firma bilgilerinin gelmediğini göreceksiniz.

Yardımlarınız için teşekkürler.

 

[modalı]

Sayın selcukkahya,

Alınmaya başladım çünkü defalarca foruma yazdığım konuda hata yaptınız.

Unutmayın hiçbir zaman hesaplanabilir alanları ve başka tabloda olan bilgileri tekrar kaydetmeyin. Böylece tutarsızlığa düşersiniz. Uygulamanızı biraz değiştirdim.

İnceleyin.

 

[assenucler]

Sayın modalı;

Günaydın. İyi hafta sonları.

E-mail olarak "Outlook Express" kullanıyorum. Kodu nasıl değiştirmem gerekli?

Private Sub mailgonder_Click()
On Error GoTo Err_mailgonder_Click


Dim mess_body As String
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)

Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
With MailOutLook
.BodyFormat = olFormatRichText
.To = Me.Email_Adress 'Veya e-mail adresi
.Subject = Me.Mess_Subject 'veya konu
.HTMLBody = Me.Mess_Text 'veya mail gövdesine yazılacaklar
If Left(Me.Mail_Attachment_Path, 1) <> "<" Then
.Attachments.Add "D:\ACCESS_PROJELERİM\köksal bey\"
End If
'.DeleteAfterSubmit = True 'This would let Outlook send th note without storing it in your sent bin
.Send
End With
'MsgBox MailOutLook.Body
Exit Sub
email_error:
MsgBox "Bir hata oluştu." & vbCrLf & "Hata mesajı:: " & Err.Description
Resume Error_out
Error_out:

Exit_mailgonder_Click:
Exit Sub

Err_mailgonder_Click:
MsgBox Err.Description
Resume Exit_mailgonder_Click

End Sub

İlgi ve yardımınız için önceden teşekkürler.

Sevgi ve saygılar.

 

[selcukkahya]

Sayın Modalı

Gerçekten çok teşekkürler.

Access ile 3 aydır ilgileniyorum. Gerek kitaplardan gerekse bu siteden çok örnek inceledim.Çeşitli çalışmalardan örnekler toplayarak kendi çalışmalarıma ilave ettim.

Emeği geçen herkese çok teşekkür ederim ve özellikle de size gerçekten bana ve diğer arkadaşlara çok yardımcı oldunuz.

Fakat naçizane arada hatalarım oluyor kusuruma bakmayın. elimden geleni yapıyorum.

konumuza dönersek gerçekten çalışmamı düzeltmişsiniz süper olmuş elinize sağlık.

Fakat yaptığım kontrollerde önizle dediğimde ben daha önce seçili firma bilgilerini tabloya bağladığım için verileri secili1,seçili2,secili3 ve secili4 hücrelerine yazdırıyordum ve önizle dediğimde veriler raporda gözüküyordu şimdi ise siz secili yaptığım alanları kaldırdığınız için şimdi önizle tuşuna bastığımda bilgileri raporda göremiyorum.

Peki bunu düzeltmem içim ne yapmam gerekiyor.

Bu konudada bana yardımcı olursanız çok sevinirim.

teşekkürler.

 

[selcukkahya]

Sayın Modalı

 

[selcukkahya]

Günaydın Sayın Modalı

Çalışmamı inceledikten sonra raporu kontrol ettim ve bazı bilgilerin raporda gözükmediğini gördüm.

Ben uğraştım fakat nasıl yapacağımı bulamadım.

Ekteki dosyadada anlatmaya çalıştım.

Yardımlarınız için tekrar şimdiden teşekkürler.