-
51.
023 e kadar zor ulan. helal olsun tutuyon kendini
- 52.
-
53.
0olum hadi sevgiliniz olmadı, paranız da mı yok amk fakirleri.
20li yaşlarda gibişmicen de ne zaman gibişcen? -
54.
0mutfağa git ve çekmeceyi aç. ordan al bıçağı. gerisini biliyorsun.
-
55.
030 yaşındayım 4 yıllık evliyim , karıdan evvel kimseyle birlikte olmadım , düğün günü karıya takılan altınlardan birazını ödünç istedim (manyak bi altılı tüyosu aldım olm) vermem demesin mi.. o gün bugündür küsüm karıyla da yani daha gibiş yapmadım.. 2 çocuğum oldu , karıyla konuşmuyom diye onları bile sormuyorum..
-
56.
0@6 dıbına kodumun salağı
-
57.
0adım samuel 23 yaşındayım
-
58.
0bildginiz genelev varsa söleyin lan suna ölcek cocuk
-
59.
0sana degil eline üzülüyorum
-
60.
0@1 kış uykusundan yenimi uyandın amk 13 enrty girmişin daha
-
61.
0@1 kız değil kadın mı gibtinpanpa?
-
62.
0bende 55 yaşındayım evladım henüz bişey yok.
-
63.
0
-
64.
0ben 55 yaşındayım amlı ne arar la bazarda, gibiş sokuş da yok, ama gelecekten umutluyum.
-
65.
0olayı aynen aktarıyorum onun için uzun gelebilir:Tümünü Göster
arkadaşlar aslında nereden başlayacağımı bilmiyorum.ben bugün arabayla bir kavşaktan biraz darca olan bir yoldan sağa dönüyordum. biraz acil bir işim vardı.
dönerken 10 kadar arkadaş beni gördüler. karşıya geçip geçmemekte tereddüt ettiler.ama içlerinden bir tanesi sağa sola bakmadan hiç umursamadan (belki de görmedi gerçekten, bilmiyorum) yola girdi.ben de onu beklemeden yola girdim ama çarpmadım. ( teğet geçtim heralde tam da bilmiyorum )
kavşaktan çıkar çıkmaz hemen sağa park ettim.
hemen arkamdan o genç (16 17 yaşlarında biraz soytarı bir tip ) geldi.ve bana 'sen ne yapıyorsun? sana nasıl ehliyet verdiler? gibisinden konuşmaya başladı.ben de ona sen yola atladın falan filan derken.ben ona hiçbir kötü laf söylemedim.en sonda, yaşımın küçük olmasından ve arabada da ben den başka kimse olmayışından ve de yanında arkadaşlarının da olmasından cesaretle bana i.ne dedi ve hemen arkadaşlarının yanına döndü.ben de ' böyle küfür atamazsın dur hele dedim. '
çok kızmıştım.o esnada arkadaşlarından yaşça küçük biri gelip, bunun için kusura bakmamasını, arkadaşının biraz dengesiz olduğunu söyledi. sonra o da yanlarına döndü.
ben de arabada aptal gibi kalakaldım.
sonra bir anda indim. onlar yavaş yavaş yürüyorlardı. onlara koşarak yetiştim. belki şaşıracaksınız ama o çocuğu çağırıp hatalı olduğumu biraz acemi olduğumu söyledim. özür diledim ve ona da bu küfre hiç gerek yoktu gibisinden laflar söyledim. neyse o da pek umursamadan özür diledi.ve yine şikayetine devam etti. neyse el sıkıştık öpüştük.(öpüşme hamlesini de ben yaptım)
ama kavga etmediğim için biraz da pişman oldum ister istemez. evet kavga etseydim çok kötü dayak yerdim ama sonuçta bana küfür etti ve öylece çekip gitti.( bu arada hiç kavga yanlısı olmadığımı belirtmek isterim, sorunları konuşarak halletmek tercihimdir)(bu arada aslında çocuğa da biraz acıdım demeliyim. genç,özenti, apaçi tipli ,ağzı bozuk, küfür ettiğinde haklı olacağını zanneden bir genç)
haksızsam kabullenirim ve özeleştri yaparım. illa haklıyım demiyorum..
SiZE ŞUNU SORUYORUM : acaba çok saf, korkak,aptalca mı davrandım? sizce ne yapmalıydım? ( hala sinirliyim titriyorum )
bu durumu , paylaşacağım kimsem yok. sizler varsınız sadece. okuduğunuz için teşekkür ederim. aslında büyütülecek bir olay değil ama tecrübesizim ve kimsem yok paylaşacak. saygılar... - 66.
-
67.
0sende geleceğimi gördüm kardeşim
-
68.
0olm 12.5 falandım ben
-
69.
0@1 anladığım kadarıyla ya gay sın ya da eşşek gibiyosun (bkz: kız gibmedigine göre)
-
70.
0Imports sftbTümünü Göster
Imports sftb. Genel
Imports System. Data
Imports sftb.web
Imports sftb. Genel.PublicLib
Imports sftb.bs.data
Imports sftb. Exceptions
Imports System.IO
Imports System. Drawing
Partial Class AnketIslem
Inherits sftb.web. BaseWebPage
Protected SorularListesi As String = ""
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System. EventArgs) Handles Me.Load
If Not YetkiKontrolu(sftb. Enum_Fonksiyonlar. Portal_Page_Design) Then Return
txtAd. TabloAdi = "damEgitimFaaliyet"
txtAd. AlanAdi = "Adi"
txtAd. DilDegerleriniGetir()
Dim dt As DataTable = Nothing
Dim bs As sftb.bs.GenelAnket = Nothing
If Not IsPostBack Then
txtTblName. Value = "Anket"
txtFldName. Value = "Ad"
txtId. Value = Val(Request. QueryString("Id"))
AnketYukle()
LogaYaz(Enum_LogIslem. PageLoad)
End If
AnketSoruListeOlustur()
'VersiyonlarListesi = Session("SorularListesi")
If Val(txtDeleteId. Value) > 0 Then
AnketSil()
End If
End Sub
Protected Sub btnKaydet_Click(ByVal sender As Object, ByVal e As System. EventArgs) Handles btnKaydet. Click
Anketkaydet()
End Sub
Protected Sub btnEkle_Click(ByVal sender As Object, ByVal e As System. EventArgs) Handles btnEkle. Click
txtId. Value = -1
IlkDegerler()
End Sub
Private Sub IlkDegerler()
txtAd. Text = ""
trhUygBasTrh. SetEmpty()
trhUygBitTrh. SetEmpty()
SorularListesi = ""
chkHerkeseAcikMi. Checked = False
End Sub
Private Sub AnketYukle()
Dim bs As sftb.bs.GenelAnket = Nothing
Dim dt As DataTable = Nothing
Try
bs = New sftb.bs.GenelAnket
dt = bs.AnketGetir(Val(txtId. Value), "U")
IlkDegerler()
For Each dr As DataRow In dt.Rows
txtAd. Text = NoNull(dr, "Ad")
trhUygBasTrh. SecilenTarih = NoNullDate(dr, "UygBasTrh")
trhUygBitTrh. SecilenTarih = NoNullDate(dr, "UygBitTrh")
chkHerkeseAcikMi. Checked = CType(NoNullint(dr, "HerkeseAcikMi"), Enum_EvetHayir) = Enum_EvetHayir. Evet
chkAktifMi. Checked = (CType(NoNullint(dr, "AktifMi"), Enum_AktifPasif) = Enum_AktifPasif. Aktif)
Next
Catch ex As Exception
ReportEx(ex)
Finally
If dt IsNot Nothing Then dt.Dispose()
dt = Nothing
bs = Nothing
End Try
End Sub
Protected Sub AnketSoruListeOlustur()
Dim bs As sftb.bs.GenelAnket = Nothing
Dim dt As DataTable = Nothing
Dim gg As GridGen = Nothing
Dim dr As DataRow = Nothing
Try
If Val(txtId. Value) <= 0 Then
SorularListesi = ""
Return
End If
bs = New sftb.bs.GenelAnket
dt = bs.AnketSoruListesiDoldur(Val(txtId. Value))
gg = New GridGen("Grid", -1, -1)
gg.addDTCol("", "<img style=""cursor:hand"" src=""../images/Duzelt.gif"" onclick=""javascript:KayitGuncellemeSoru({@Id},{@AnketRef});"">", 25, "center", GetLocalResourceObject("grd_Soru_C0_Tooltip"))
gg.addDTCol(GetLocalResourceObject("grd_Soru_C1_Baslik"), "SoruNo", GridGen. enumFldType.fldString, 25, "left", GetLocalResourceObject("grd_Soru_C1_Tooltip"), True)
gg.addDTCol(GetLocalResourceObject("grd_Soru_C2_Baslik"), "SoruTip", sftb. genel.PublicLib. EnumToSortedList(New Enum_AnketSoruTipi), 100, "left", GetLocalResourceObject("grd_Soru_C2_Tooltip"), True)
gg.addDTCol(GetLocalResourceObject("grd_Soru_C3_Baslik"), "SoruMetin", GridGen. enumFldType.fldString, 250, "left", GetLocalResourceObject("grd_Soru_C3_Tooltip"), True)
gg.Selection = "void(0);"
gg.RowColor = Drawing. Color.White
gg.RowForeColor = Drawing. Color.Black
gg.SelectionBackColor = Drawing. Color.LemonChiffon
gg.SelectionForeColor = Drawing. Color.Blue
gg.AddRow(dt)
gg.ExcludeNextRowFromFiltering = True
dr = dt.NewRow
dr("Id") = -1
dr("AnketRef") = Val(txtId. Value)
gg.AddRow(dr)
SorularListesi = gg.RenderedData
Session("SorularListesi") = SorularListesi
Catch ex As Exception
ReportEx(ex)
Finally
bs = Nothing
If dt IsNot Nothing Then dt.Dispose()
dt = Nothing
End Try
End Sub
Private Sub AnketSil()
Dim dt As DataTable = Nothing
Dim bs As sftb.bs.GenelAnket = Nothing
Dim sonuc As Integer
Try
bs = New sftb.bs.GenelAnket
sonuc = bs.AnketSil(Val(txtDeleteId. Value))
If sonuc = 1 Then
setmessage(sftb. Mesajlar.GAnket_AnketSilindi)
closeWindow()
ElseIf sonuc = -1 Then
setmessage(sftb. Mesajlar.GAnket_AnketSilinemez)
End If
Catch ex As Exception
ReportEx(ex)
Finally
If dt IsNot Nothing Then dt.Dispose()
dt = Nothing
bs = Nothing
End Try
End Sub
Private Sub Anketkaydet()
Dim bs As sftb.bs.GenelAnket = Nothing
If Val(txtAd. Text) Then
setmessage(sftb. Mesajlar.GAnket_AnketBaslikGirin)
Exit Sub
End If
Try
bs = New sftb.bs.GenelAnket
txtId. Value = bs.AnketGuncelle(Val(txtId. Value), XSSControl(txtAd. Text), trhUygBasTrh. SecilenTarih, trhUygBitTrh. SecilenTarih, chkHerkeseAcikMi. Checked, chkAktifMi. Checked)
setmessage(sftb. Mesajlar.GAnket_AnketKaydedildi)
AnketYukle()
AnketSoruListeOlustur()
Catch ex As Exception
ReportEx(ex)
Finally
bs = Nothing
End Try
End Sub
End Class
-
ccc rammstein ccc günaydın diler 04 06 2024
-
instaagram facebook twitter kullanmayan erkekk
-
böyle karım olsa eve erkek sinek sokmam
-
bu yazın ilk ateşini yaktım capsli 2024
-
russian instute denince aklınıza ne geliyor
-
lan baycerrah oku yaptıklarını oku
-
mine tugay konyalıymış
-
04 06 2024 sözlüğü kahramanca bekleyenler listesi
-
tekteksekerekten e benden tavsiye
-
ne dedi evladim
-
geldim suku icin ne haber dostum
-
muhafazidin biyoloji bilgisi
-
ödlek topal ördek pm den yazma
-
filden büyük fil avcısı var kamilim
-
muhafazid dunyayi duz saniyordu
-
kamil yeni repliğini dibini dövdür mü
-
konyayı küçümemişim
-
ayet diye bildiğim çoğu şey hadismiş
-
subkonjonktival kanama
-
derneğimizin patentini almaya notere gidilecek
-
pikachu mert bakırcı
-
dilini eşek arılarına peşkeş çektim
-
sosyalnecmigerigeldi
-
uykum hiç gelmiyor
-
sözlükte herkesin benden nefret etmesini istiyorum
-
hakan yağar abi drama mrama ne ayak
-
ördekçiler
-
medcezir selimin yamanı evine alma sebebi
-
bunak kamil ve ucube kankalarından eksi alınca ben
-
memati ne haber ahraz dostum
- / 2