Anolog saat
iyi günler
Sqlite üzerinde veritabanınız var ve ADO ile tabloya kayıt ekleyecek iseniz.
bunu niye ekledim. çünkü buluncaya kadar saatlerim gitti
ben yandım başkaları yanmasın
Sqlite üzerinde veritabanınız var ve ADO ile tabloya kayıt ekleyecek iseniz.
Public Function updateLog(person As String) As Long
Dim akca_conndriver, akca_conndatabasepathnw, akca_conndatabasefile, akca_conndatabaseend As String
Dim str As String
Dim strSQL As String
Dim conn As Object, rs As Object
Set conn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
akca_conndriver = "Driver=SQLite3 ODBC Driver;"
akca_conndatabasepathnw = "Database=\\PC\Local$\akca\data\"
akca_conndatabasefile = "mdrs.db"
akca_conndatabaseend = ";"
Set conn = Nothing
str = akca_conndriver & akca_conndatabasepathnw & akca_conndatabasefile & akca_conndatabaseend
Set conn = get_akca_dbconn(str)
strSQL = "SELECT * FROM itLogUpdate;"
rs.Open strSQL, conn, adOpenDynamic, adLockOptimistic
rs.AddNew
rs!username = usernameD
rs!perId = person
rs!pcname = ComputerName()
rs!updatetime = Now()
rs.update
updateLog = rs!logID
rs.Close
Set conn = Nothing
Set rs = Nothing
End Function
bunu niye ekledim. çünkü buluncaya kadar saatlerim gitti
ben yandım başkaları yanmasın
Her ne zaman ActiveX kontrol kullanan bir Microsoft Visual FoxPro uygulaması dağıttığınızda, .ocx dosyası doğru bir şekilde kaydedilmelidir. 32-bit bir işletim sistemine .ocx dosyasını manüel olarak yüklemek için Microsoft Register Server (Regsvr32.exe)'ı kullanabilirsiniz. Visual FoxPro 3.0 ve 3.0b'de Regsvr32.exe dosyası \Vfp\Samples\Ole dizininde bulunmaktadır. Visual FoxPro 6.0'da Regsvr32.exe, Visual FoxPro dizininin Distrib.src dizininde yer almaktadır. Visual FoxPro uygulamasıyla dağıtılabilir. Regsvr32.exe için kullanılan sintaks şöyledir:
/u, .ocx dosyasını kayıttan çıkar anlamına gelmektedir. /s Sessiz Mod (mesaj gösterme) anlamına gelmektedir. Aşağıdaki örnek, Microsoft MAPI ActiveX Kontrolü mesaj göstermeden kaydetmektedir.
Regsvr32 /s mscomctl32.ocx
Bu örneği Visual FoxPro uygulamasında uygulamak için, ÇALIŞTIR komutunu şu şekilde uygulayın:
RUN /N Regsvr32 /s
Bir kontrolü kaydederken hata meydana gelirse şunları yapın:
Kod:
Regsvr32 [/s]Regsvr32 /s mscomctl32.ocx
Bu örneği Visual FoxPro uygulamasında uygulamak için, ÇALIŞTIR komutunu şu şekilde uygulayın:
RUN /N Regsvr32 /s
Bir kontrolü kaydederken hata meydana gelirse şunları yapın:
- Kontrolün kayıt dizininde daha önceden kaydedilmediğinden emin olun.
- Aşağıdaki dosyaların Windows\System dizininde varolduğunu doğrulayın:
mfc30.dll olepro32.dll msvcrt20.dll
mfc40.dll msvcrt40.dll
Bu dosyalardan biri eksikse, şöyle bir mesaj alabilirsiniz:
Hata: OLE Hata Kodu 0x80040112: Bu sınıf için uygun lisans bulunamadı.
Milli Eğitim Bakanlığına Bağlı Okullarda Disiplin İşlemlerinin yürütülmesi için yapmış olduğum program etedir. Çalışmamda yardımlarını esirgemeyen; Ozan Beye, Mehmet DEMİRAL Bey'e, Sayın Berduşa, Acceesman'a ve ismini sayamadığım diğer hocalarıma en içten dileklerimi sunuyorum. Esiklikleri olabilir. Program malum kovid sürecinden dolayı yerinde test edilememiştir.
Hoşgeldin, Ziyaretçi
Forum İstatistikleri
Kimler Çevrimiçi
Şu anda 64 aktif kullanıcı var.
AdsenseBot, AhrefsBot, Applebot, Bing Bot, Google Bot, Majestic12, PetalBot, SemrushBot, YandexBot, majestic12, C*e*l*o*y*c*e
(1 Üye - 53 Ziyaretçi)
Son Yazılanlar
Access Html Gantt Chart
Yorum
2
•
Okunma
156
Site Ve Apartman Yönetim ...
Yorum
23
•
Okunma
8.129
Ms Access Gantt Chart
Yorum
0
•
Okunma
65
Keşif Metraj
Yorum
0
•
Okunma
74