|
Tags
|
|
|
|
|
bir kodun icinde koordinat bulma
|
|
procedure TForm1.Memo1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
cx,cy:Integer;
pnt:TPoint;
begin
pnt:=Point(x,y);
pnt:=ScreenToClient(Memo1.ClientToScreen(pnt));
cx:=pnt.x;
cy:=pnt.y;
end;
|
|
kodun icinde kriter i yerlestiremedim
|
|
sevgili arkadaslar
asagidaki kodun icindeki kriteri calistiramiyorum. yardimci olurmusuunuz
[code=vba]
On Error Resume Next
'Dim cn As ADODB.Connection
Dim rst As New ADODB.Recordset
Set cn = New ADODB.Connection
cn.ConnectionString = strConnect
cn.Open "server=" & strServer & ";driver={SQL Server};database=" & strDatabase & ";TimeOut=1000;dsn=’’;", strUID, strPWD
If cn.State = adStateOpen Then
rst.CursorLocation = adUseClient
Dim Link As String
Link = Forms!
|
Author: armane - Replies: 5 - Views: 1718
|
|
merhabalar ,
bir süredir üzerinde oldugum çalışmanın sayın Taruz hocamın büyük katkılarıyla sonuna geldim sanırım.
ek te ki uygulamada iki ayrı kod çalışıyor. birincisi formun " zaman dolduğunda" olayında 2. si ise " mail gönderme butonunda.
ilk kod ; kullanıcı formda ki " görüşme sonucu " alanını " ulaşılamadı " seçtiğinde " 1 saat sonunda " uyarı verilmesi için yapıldı. ekrana gelen uyarıya " tamam " dedikten sonra uyarıda ki " terminal ıd " ye göre gerekli çalışmayı yapıyor.
|
|
tablo alan adı değiştiğinde kodun çalışmaması
|
|
merhaba ekteki dosyada tablodaki verileri bir başka tabloya aktarıyorum ancak tablo sütun adlarını kelime aralarında boşluk olacak şekilde yazdığımda kod hata veriyor örneğin SONDAJKUYUSUADI alanını SONDAJ KUYUSU ADI olarak değiştirdiğimde kodda SONDAJ_KUYUSU_ADI olarak değiştiriyorum ancak kod çalışmıyor acaba problem nerededir?
|
|
Kodun güncelleştirme sonrasında çalışması
|
|
Arkadaşlar merhaba
If [KVM] < GV20 Then GVORAN = 15
If [KVM] > GV20 And [KVM] < GV27 Then GVORAN = 20
If ([KVM] + [GV MATRAHI]) > GV20 And [KVM] < GV20 Then GVORAN = 15 + [Metin359]
If [KVM] > GV27 Then GVORAN = 27
If ([KVM] + [GV MATRAHI]) > GV27 And [KVM] < GV27 Then GVORAN = 20 + [Metin361]
yukarıdaki kodun kv matrahı alanının ve gv matrahı alanının değişmesi/güncellenmesi sonrasında çalışmasını istiyorum.
kodu kv matrahı alanının ve gv matrahı alanının güncelleştirme sonrasında
|
Author: sercann - Replies: 3 - Views: 505
|
|
INSERT INTO Comments (Bug, User, CTimestamp, Comment, History) VALUES([ID], [TempVars]![CurrentUserID],Now(),"Status changed to " & [Status], 1)
Yukarıdaki kod Kullanıcının durumu (3) resolved olarak değiştirdiğinde aşağıdaki notu düşmektedir
status changed to (3) Resolved by anonymous at 28.01.2019 22:25:50
ben yukarıdaki kodu düzenleyerek anonymous (yani Kullanıcı) durumu (3) resolved olarak değiştirdi at 28.01.2019 22:25:50 şeklinde nasıl düzenleyebilirim
teşekkürler
|
