Tags
|
|
|
İki Tarih Farkını "YIL-AY-GÜN" Veren Fonksiyon (DateDiff_ze_bb)
|
Sevgili dostum beab ile VBA' de iki tarih arası farkını "1 YIL 2 AY 12 GÜN" gibi formatta çeviren fonksiyon ihtiyacı olabileceğini düşündük.
Bu amaçla hazırladığımız fonksiyonun faydalı olması dileklerimizle...
[code=vba]Public Function DateDiff_ze_bb(KUCUK_TARIH As Date, BUYUK_TARIH As Date) As String
Dim GUN&, AY%, YIL%
Dim GG As Date, GG2 As Date
GUN = DateDiff("d", KUCUK_TARIH, BUYUK_TARIH)
AY = Int((GUN Mod 365.25) / 30)
YIL = Int(GUN \ 365.25)
GG = Da
|
Sabit boşluklu txt yapmak için sifir ve boşluk ekleyen fonksiyon
|
Merhaba Arkadaşlar,
Malumunuz verileri txt yapmak veya almak için 2 yöntem kullanılıyor.
1- Sınırlandırılmamış ( Sabit Boşluşlu )
2- Sınırlandırmış (Özel işaretlerle ayırırma)
Access ortamındaki sorgu ve tabloyu txt yaparken,
Sınırlandırılmamış (Sabit Boşluklu) veri gerekli olduğunda işe yarayacak kendi yazdığım 2 fonksiyonu gönderiyorum.
Umarım faydalılı olur.
Saygılarımla.
Function SifirEkle(Saha, Adet) As String
Dim i As Integer
Say = Len(Saha)
Fark = Adet - Say
S
|
Author: metinse - Replies: 4 - Views: 14663
Yazıların ilk harfleri büyük diğerlerini küçük yapan SQL Scaler Fonksiyon
|
Arkadaşlar,
MS SQL için yazıların ilk harfleri büyük diğerlerini küçük yapmam gerekiyordu, aşağıdaki SQL Scaler fonksiyonu yazdım.
Umarım faydalı olur.
Saygılarımla.
[code=sql]
CREATE FUNCTION BKUCUK (
@kelime NVARCHAR(MAX)
)
RETURNS NVARCHAR(MAX)
AS
BEGIN
DECLARE @girdi NVARCHAR(MAX)
DECLARE @sonuc NVARCHAR(MAX)
DECLARE @say INTEGER
DECLARE @uzunluk INTEGER
SET @girdi = LTRIM(@kelime)
SET @uzunluk=LEN(@girdi)
SET @say=0
WHILE @uzunluk>@say
BEGIN
|
Author: Orion - Replies: 3 - Views: 5583
VBNET-2008 Fonksiyon'da değişkeni tanımlamak.
|
vb.net Public Function CSVOlarakKaydet(ByVal filename As String, ByVal lv As ListView) As Boolean
Merhaba.
Yukarıdaki kodu aşağıdaki gibi yazabilirmiyiz?
ByVal bu tanımlamaya ne katıyor?
teşekkür ederim.
vb.net Public Function CSVOlarakKaydet(filename As String, lv As ListView) As Boolean
|
Nesne atayan fonksiyon hakkında soru
|
aşağıdaki fonksiyona frmName ve objName sorgudan değişken olarak geliyor. ancak sanırım gelen değişken string olduğu için object oluşturulamıyor. yazımda hata yapıyorum ama nerede. yardımınız için şimdiden teşekkürler.
Private Function objtree(frmName as string , objName as string) As TreeView
' aşağıdaki her iki satırda çalışmıyor
Set objtree = Forms!(frmName).Controls(objName).object
'denedim olmadı
Set objtree = "[Forms]![" & frmName & "]![" & objName & "].object"
' bu da çalışmad
|
Author: beab05 - Replies: 18 - Views: 13870
Access Fonksiyon Kutusu
|
[size=medium]
Merhaba arkadaşlar;
Access ile birlikte kullanabileceğiniz ve içinde 7, aslında 8 ayrı fonksiyon bulunan çok amaçlı bir DLL hazırladım. Başta da belirtmem gerekir ki bu DLL dosyasını Access, Excel, VB6 veya .Net gibi projelerinizde rahatlıkla kullanabilirsiniz.
DLL dosyamızı kullanmak için öncelikle “Access-Sql.dll” ve “Access-Sql.tlb” dosyalarımızı daha rahat bir kullanım için [
|
Kullanıcı tanımlı fonksiyon & Trigger çalışması
|
Merhaba,
Arada pratik yapmak lazım... )
Benzer konuyu Firebird' den alıp t-sql'e uyarladım.
Bu örnekte sayıyı yazıya çeviren yapı t-sql fonksiyonu olarak derlendi. Fonksiyonu, "dbo.deneme" isimli tabloda "sayi" alanına değer eklendiğinde/değiştiğinde tetiklenecek şekilde de destekledim.
Ekteki yedek dosyasını(.bak) restore yaptıktan sonra sunucunuza "attach" layın. İki tablo, 1 trigger ve bir de f
|
Fonksiyon ve alan adı problemi
|
Merhaba;
Şöyle bir problemim var,
Bir raporum var. Verilen hizmetleri listeleyen maksimum 8 adete kadar hizmet verilebiliyor.)
Rapor Örneği:
----------------------------------------------
kisi_adı soyadı
1- hizmet_1, işlem_1
2-hizmet_2, işlem_2
.
.
.
--------------------------------------------
Benim yapmak istediğim ise şu:
hizmetlerin başındaki numaraların otomatik atması.
Daha önce ilgili tablomda 8 adet alan (hizmt_numarası_1, hizmet_numarası_2,....8) oluşturarak formda
|
Author: Tornado - Replies: 3 - Views: 3327
Access 2003 Videolu Anlatım: SQL Kod Yazma - Hazır Fonksiyon Kullanımına Örnek
|
sql kod yazarken hazır fonksiyon kullanımına örnek verilmiştir
|
Author: Taruz - Replies: 16 - Views: 14651
64 Bit Versiyonlardaki Deklarasyon Kaynaklı Fonksiyon Hataları
|
Merhaba arkadaşlar..
Uygulamalarımız içerisinde kullandığımız bazı modüller deklarasyon içerir.. Bunlar 32 bit Access sürümlerinde hatasız çalışırken 64 bit sürümlerde kullanmak istediğimizde hata verir.. Bu sorunu aşmak için deklarasyonlara küçük bir ilave tanım yapmamız gerekmektedir..
[code=vba]#If VBA7 And Win64 Then '64 bit için
Private Declare PtrSafe Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
#Else '32 bit için
Private Declare Function GetSyste
|