Close
Faqja 2 prej 2 FillimFillim 12
Duke shfaqur rezultatin 21 deri 32 prej 32
  1. #21
    i/e regjistruar
    Anėtarėsuar
    11-10-2009
    Postime
    7
    Citim Postuar mė parė nga Uke Topalli Lexo Postimin
    Nje verrejtje per programuesit e ri. Koheve te fundit kam verejtur nje tendence tek programuesit e ri te cilen une e quaj "tejnormailizim". Ja per cka eshte fjala. Shumica e fillestareve kur vie puna tek dizajnimi i bazes se shenimeve, me zell te madh i percjellin tri normat e normalizimit te bazes por ne fund nuk e bejne denormalizimin e duhur. Denormailizimi si hapi i fundit eshte absolutisht i nevojshem neqoftese deshironi te keni nje platforme qe mund te shfrytezohet per nje kohe te gjate, sepse e mundeson mirembajtjen e shenimeve si dhe shpejteson raportet ne kurriz te rritjes minimale te bazes se shenimeve.

    Nuk besoj qe ka mbrri tek ai stad. Se pari do te shkoj normalizimi e pastaj denormalizimi.

  2. #22
    i/e regjistruar
    Anėtarėsuar
    26-04-2007
    Postime
    89
    A ka mundesi nga ky shembull me larte qe ma keni dhene ti importoj te dhenat ne datagrid fajllin qe me heret e kam ruajtur nga datagridi tjeter

    dmth nga nje datagrid e ruaj si tekst fajll ne datagridin tjeter te zbrazet e importoj ate tekst fajll provova me stream reader por nuk me shkoj per dore

    'eksporto ne file "eksporti.txt"

    Dim fs As FileStream = New FileStream("ekspoti.txt", FileMode.open, FileAccess.read)
    Dim sr As Streamreader = New Streamreader(fs)

    sr.read()

    sr.Close()
    fs.Close()
    me kete kod nuk kam mundur ta arij

  3. #23
    i/e regjistruar
    Anėtarėsuar
    26-04-2007
    Postime
    89
    Citim Postuar mė parė nga hot_prinz Lexo Postimin
    Kodi:
            'ndryshore qe mban permbajtjen e datagridit
            Dim permbajtja As String = String.Empty
    
            'per cdo rresht/row ne DataGridView
            For Each DataGridViewRow In DataGridView1.Rows
    
                'per cdo kolone te datagridit
                For i As Integer = 0 To DataGridView1.Columns.Count
    
                    Try
                        permbajtja += DataGridView1(i, DataGridViewRow.Index).Value.ToString() + ", "
                    Catch
                    End Try
    
                Next
    
                'pas cdo rreshti fut nje newLine
                permbajtja += vbNewLine
    
            Next
    
            'eksporto ne file "eksporti.txt"
            Dim fs As FileStream = New FileStream("ekspoti.txt", FileMode.Create, FileAccess.Write)
            Dim sw As StreamWriter = New StreamWriter(fs)
    
            sw.Write(permbajtja)
    
            sw.Close()
            fs.Close()
    
      Dim fs As FileStream = New FileStream("ekspoti.txt", FileMode.open, FileAccess.read)
            Dim sr As Streamreaderr = New Streamread(fs)
    
            sr.read(permbajtja)
    
            sr.Close()
            fs.Close()
    
    nuk deshti keshtu si ja kam bere une a duhet me bo naj ndryshim tjeter?
    DataGridView1 e ndryshon me emrin e DataGrid ne formen tende.
    Kete fajll nga datagridview1 a kam mundesi ta importoj ne datagridview2 me kodin

  4. #24
    Nuk ka faj pasqyra kur e Maska e Renato196
    Anėtarėsuar
    12-11-2010
    Vendndodhja
    Shqiperi Elbasan
    Postime
    47
    Do te desha ndihme ne Access 2010.

    Kam hartuar nje database per personelin, shih foton e formes se kontakteve. idea eshte psh, kur duam te dime se kur del ne pension nje punonjes. Nga 65 per meshkujt zbresim moshen dhe mbetet diferenca. ose 60 per femrat zbresim moshen del diferenca. ne se diferenca eshte me e vogel se 1 vit, atehere shfaqet nje mesazh.
    Shih kodin:
    Option Compare Database
    Option Explicit

    Private Sub Pensioni_Click()
    If Me.Gjinia = "Femer" Then
    Pensioni = 60 - Me.Mosha
    End If

    If Me.Gjinia = "Mashkull" Then
    Pensioni = 65 - Me.Mosha
    End If

    If Pensioni<= 1 Then
    MsgBox ("Me pak se njevitderi ne pension")
    End If
    End Sub

    Deri ketu ne rregull, problemi eshte se ne control "deri ne pension", diferenca SHFAQET VETEM PO TE BEJ CLICK ATJE. si duhet bere, qe diferenca te shfaqet automatikisht?

  5. #25
    i/e regjistruar Maska e hot_prinz
    Anėtarėsuar
    29-05-2007
    Vendndodhja
    Frankfurt
    Postime
    9,878
    Per te procesuar automatikisht proceduren te nevojitet nje time-trigger qe ne kohe te definuar, psh. cdo ore kontrollon moshat nese ndonjeri eshte gati per pension dhe lajmeron ose ndermerr ndonje aksion tjeter.

    Kjo mund te behet me nje Timer ne Access,
    ose me ndonje script jashte databazes qe mund te lansohet nga Sheduler i OS-it (Windows).
    tempus fugit, amor manet in aeternum corde

  6. #26
    Nuk ka faj pasqyra kur e Maska e Renato196
    Anėtarėsuar
    12-11-2010
    Vendndodhja
    Shqiperi Elbasan
    Postime
    47
    Citim Postuar mė parė nga hot_prinz Lexo Postimin
    Per te procesuar automatikisht proceduren te nevojitet nje time-trigger qe ne kohe te definuar, psh. cdo ore kontrollon moshat nese ndonjeri eshte gati per pension dhe lajmeron ose ndermerr ndonje aksion tjeter.

    Kjo mund te behet me nje Timer ne Access,
    ose me ndonje script jashte databazes qe mund te lansohet nga Sheduler i OS-it (Windows).
    Shume faleminderit mik. Me konkretisht a mundesh. Do te isha shume mirenjohes
    Ju faleminderit.

  7. #27
    i/e regjistruar Maska e hot_prinz
    Anėtarėsuar
    29-05-2007
    Vendndodhja
    Frankfurt
    Postime
    9,878
    Citim Postuar mė parė nga Renato196 Lexo Postimin
    Shume faleminderit mik. Me konkretisht a mundesh. Do te isha shume mirenjohes
    Ju faleminderit.
    Mundesia qe une do preferoja eshte, nje script/aplikacion qe drejtohet nga sheduler i windows, perparesite jane se do ekzekutohej edhe atehere kur databaza ne access nuk eshte e hapur dhe programimi ne access vba eshte shume i shpifun, sipas mendimit tim.

    Ja nje pseudo kod ne C#, qe lidh databazen e accessit dhe kontrollon moshat nese ndonje person eshte afer pensionit, per dic me konkrete me duhet databaza te lokalizoj emrat e kolonave.

    Kodi PHP:
    string emriTabeles "";
    string emriKolones "";
    int mosha 0;

    OleDbConnection con = new OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" locmdDB);
    con.Open();

    string strSQL "SELECT * FROM " emriTabeles;

    OleDbCommand cmd = new OleDbCommand(strSQLcon);
    OleDbDataReader dr cmd.ExecuteReader();

    while (
    dr.Read())
    {

        
    mosha Convert.ToInt(dr[emriKolones].ToString().Trim());
        
    gjinia dr[emriKolones].ToString().Trim();

    if(
    gjinia == "Femer")
    {
        if((
    60-mosha) <= 1)
            
    MessageBox.Show("Me pak se njevitderi ne pension");
    }

    if(
    gjinia == "Mashkull")
    {
        if((
    65-mosha) <= 1)
            
    MessageBox.Show("Me pak se njevitderi ne pension");
    }

    }

    dr.Close();
    con.Close(); 
    Nuk eshte e thene te programohet ne C#, mund te jete ne cfaredo lloj gjuhe, kryesorja eshte qe automatikisht ne kohen e dhene te aktivizoje kontrollen per pension.

    Jane edhe disa gjera ne kete logjike qe duhen te jene me te qarta, e marrim se per cdo dite kontrollohet mosha dhe nje person eshte afruar pensionit, kjo logjike do tregonte per cdo dite ne vitin e fundit para pensionit se personi x do te dale ne pension, gje e neveritshme. Ketu do duhej ndoshta te krijohet nje kolone enkas per statusin e pensionit, psh. me vleren 0 kur personi nuk eshte ne vitin e fundit para pensionit, 1=kur personi eshte ne vitin e fundit para pensionit (ne kete menyre aplikacioni do te lajmeroje vetem njehere se personi x eshte para pensionimit) dhe vlera 2 = kur personi ka dalur ne pension.

    Lajmerimi qe personi eshte para daljes ne pension do duhej te dergohej me e-mail ne sekretariat ndoshta edhe automatikisht te krijonte nje mirenjohje dhe jo te shfaqej ne Mesagge Box.
    Ndryshuar pėr herė tė fundit nga hot_prinz : 08-11-2012 mė 15:58
    tempus fugit, amor manet in aeternum corde

  8. #28
    Nuk ka faj pasqyra kur e Maska e Renato196
    Anėtarėsuar
    12-11-2010
    Vendndodhja
    Shqiperi Elbasan
    Postime
    47
    Shume faleminderit hot_Princ, por duke ju kerkuar ndjese, do te desha nje kod ne VBA sepse nuk jam familjar me C# ose PHP plus qe C# expres edition qe kam instaluar nuk e ka PHP, dhe nuk di te lidh nje script nga Windows ne textbox qe kam bere kalkulimit. Tjeter kodin qe kam shkruar e kam event ne OnClick.
    Edhe nje here faleminderit mik

  9. #29
    i/e regjistruar Maska e hot_prinz
    Anėtarėsuar
    29-05-2007
    Vendndodhja
    Frankfurt
    Postime
    9,878
    Kodi PHP:

    Option Compare Database
    Option Explicit

    Private Sub Pensioni_Click()

    If 
    Me.Gjinia "Femer" Then
        Pensioni 
    60 Me.Mosha
    End 
    If

    If 
    Me.Gjinia "Mashkull" Then
        Pensioni 
    65 Me.Mosha
    End 
    If

    If 
    Pensioni <= 1 Then
        MsgBox 
    ("Me pak se njevitderi ne pension")
    End If

    End Sub

    Sub Form_Load
    ()

        
    Me.TimerInterval 1000
        
    End Sub

    Private Sub Form_Timer()

        
    Pensioni_Click
        
    End Sub 
    Provoje kete,

    ne Form_Load() inicializojme Timer-in e Formes Me.TimerInterval = 1000, 1000 jane ne milisekonda 1 sekonde, 3600000 jane 1 ore, e vendos vleren qe ti deshiron.

    Procedura Form_Timer() e aktivizon proceduren Pensioni_Click() automatikisht, per cdo interval te kohes se definuar ne Me.TimerInterwal = X.
    tempus fugit, amor manet in aeternum corde

  10. #30
    Nuk ka faj pasqyra kur e Maska e Renato196
    Anėtarėsuar
    12-11-2010
    Vendndodhja
    Shqiperi Elbasan
    Postime
    47
    Shume Faleminderit hot_Princ per ndihmen, dhe gezuar festen e pavaresise

  11. #31
    i/e regjistruar Maska e hot_prinz
    Anėtarėsuar
    29-05-2007
    Vendndodhja
    Frankfurt
    Postime
    9,878
    Je i mireseardhur dhe me vjen mire qe munda te te ndihmoj,
    gezuar gjithashtu festen e pavaresise.
    tempus fugit, amor manet in aeternum corde

  12. #32
    i/e regjistruar
    Anėtarėsuar
    16-05-2014
    Postime
    1

    Pėr: Kam nevoj per ndihme ne VB.Net ose Access

    ju kisha lut nese mundet dikush me ndimu per nje databas access si ti thrras format me f2 apo f3 a tjeter me ifkeycode

Faqja 2 prej 2 FillimFillim 12

Regullat e Postimit

  • Ju nuk mund tė hapni tema tė reja.
  • Ju nuk mund tė postoni nė tema.
  • Ju nuk mund tė bashkėngjitni skedarė.
  • Ju nuk mund tė ndryshoni postimet tuaja.
  •