İstediğin örnek bu konunun 3.sayfasındaki 14. nolu mesajda var.
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Konfüçyüs
strBody = ""
strBody = strBody & "<p>"
strBody = strBody & "<font face='Verdana' size='2'>"
strBody = strBody & "Sn. " & Me.Yetkili.Column(1)
strBody = strBody & "<br><br>"
strBody = strBody & "Satınalma Yetkilisi olduğunuz " & Me.TALEP_EDENIN_ADI & " malzeme satınalma talebinde bulunmuştur."
strBody = strBody & "<br><br>"
strBody = strBody & "Concorde Menü'de 'MALZEME TALEPLERİ' programındaki 'Yetkili Onayı' formunda"
strBody = strBody & "<br>"
strBody = strBody & " malzeme talebine onay verebilir veya talebi iptal edebilirsiniz."
strBody = strBody & "<br><br><br>"
strBody = strBody & "Talep Edilen Malzemeler: (No:" & Me.TALEP_NO & ")"
strBody = strBody & "</font>"
strBody = strBody & "</p>"
strBody = strBody & "<table border='1' cellspacing='0' cellpadding='1' font face='Verdana' size='1' bgcolor='LightBlue'>"
strBody = strBody & "<tr>"
strBody = strBody & "<td><b> Malzeme </b></td>"
strBody = strBody & "<td><b> Miktar </b></td>"
strBody = strBody & "</tr>"
strBody = strBody & "<tr>"
strBody = strBody & "<td> " & RS.Fields("MLZ_TANIMI") & " </td>"
strBody = strBody & "<td align=right> " & RS.Fields("MLZ_TALEP_MIKTARI") & " " & RS.Fields("MLZ_BIRIMI") & " </td>"
strBody = strBody & "</tr>"
strBody = strBody & "</table>"
strBody = strBody & "</font><br><br>"
(26/10/2010, 13:54)mustafa_atr yazdı: Sorununuzun çözülmesine sevindim.