Vraag : Volgende en Vorige Knopen die werken niet

Ik voegde Eerste, Vorige, Volgende en Laatste knopen aan mijn venstersvorm zodat toe kon de gebruiker door de verslagen in een dataset cirkelen.  Maar de vormgebieden werken niet bij wanneer de knopen worden geselecteerd.  Ik mis iets.  Kan iemand me alstublieft helpen?  Dank you.
" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
van 
Private SublstPtName_Click (ByVal afzender als Voorwerp, ByVal e als System.EventArgs) Handvatten lstPtName.Click
        LoadPtData ()
        Me.txt NoRecs.Text = Me.BindingContext (dsPatient.Tables („Patiënten“)). Count.ToString
        Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie = 0
        Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie + 1
    Sub van het eind

    Privé SubbtnNext_Click (ByVal afzender als Voorwerp, ByVal e als System.EventArgs) Handvatten btnNext.Click
        Als Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie < Me.BindingContext (dsPatient.Tables („Patiënten“)). Telling - 1 toen
            Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie = Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie + 1
            Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie + 1
        Eind als
    Sub van het eind

    Privé SubbtnLast_Click (ByVal afzender als Voorwerp, ByVal e als System.EventArgs) Handvatten btnLast.Click
        Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie = Me.BindingContext (dsPatient.Tables („Patiënten“)). Telling - 1
        Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie + 1
    Sub van het eind

    Privé SubbtnPrev_Click (ByVal afzender als Voorwerp, ByVal e als System.EventArgs) Handvatten btnPrev.Click
        Als Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie > 0 toen
            Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie = Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie - 1
            Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie + 1
        Eind als
    Sub van het eind

    Privé SubbtnFirst_Click (ByVal afzender als Voorwerp, ByVal e als System.EventArgs) Handvatten btnFirst.Click
        Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie = 0
        Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables („Patiënten“)). Positie + 1
    Sub van het eind
    Sub LoadPtData ()

        dsPatient.Clear ()
        Schemerige daPatient als Nieuwe SqlClient.SqlDataAdapter („SELECTEER * UIT RawData WAAR PtName = „“ & lstPtName.Text & „“ „, conn)

        Probeer
            conn. Open ()
            dapatient. Vul (dsPatient, „Patiënten“)
            conn. Sluit ()
        Vang ex als Uitzondering
            Ex MsgBox (. Bericht)
        Het eind probeert

        Als txtPtName.DataBindings.Count = 0 toen
            txtPtName.DataBindings.Add („Tekst“, dsPatient, „Patients.PtName“)
            txtDOB.DataBindings.Add („Tekst“, dsPatient, „Patients.PtDOB“, Waar, DataSourceUpdateMode.OnPropertyChanged, niets, „MMM yyyy dd,“)
            txtSex.DataBindings.Add („Tekst“, dsPatient, „Patients.PtSex“)
            txtPhys.DataBindings.Add („tekst“, dsPatient, „Patients.PhyName“)
            txtTest.DataBindings.Add („Tekst“, dsPatient, „Patients.Test“)
            txtResult.DataBindings.Add („Tekst“, dsPatient, „Patients.Result“)
            txtUOM.DataBindings.Add („Tekst“, dsPatient, „Patients.UOM“)
            txtCollDate.DataBindings.Add („Tekst“, dsPatient, „Patients.CollectDate“, Waar, DataSourceUpdateMode.OnPropertyChanged, niets, „MMM yyyy dd,“)
            txtCollTime.DataBindings.Add („Tekst“, dsPatient, „Patients.CollectTime“)
        Eind als
    Sub van het eind

Antwoord : Volgende en Vorige Knopen die werken niet

Dossier dat de montages van het Beleid van de Groep deelt
De montages van het Beleid van de groep verbonden aan dossier het delen
Het plaatsende Doel van het Beleid van de groep

Verhinder gebruikers dossiers binnen hun profiel te delen
      

Bepaalt of de gebruikers dossiers binnen hun profiel aan andere gebruikers op hun netwerk mogen delen. Het delen van om het even welke soort wordt toegelaten slechts wanneer een beheerder dossier delend op die computer heeft aangezet.

Als u dit beleid toelaat, zullen de gebruikers geen dossiers binnen hun profiel kunnen delen gebruikend de delende tovenaar. Ook, zal de delende tovenaar geen aandeel bij %SystemRoot% gebruikers \ creëren en kan slechts worden gebruikt om aandelen SMB op omslagen tot stand te brengen.

Als u onbruikbaar maakt of dit beleid niet vormt, dan zullen de gebruikers dossiers uit hun gebruikersprofiel kunnen delen nadat een beheerder dossier delend op die computer heeft aangezet.



Bron: http://technet.microsoft.com/es-es/library/cc731655%28WS.10%29.aspx
Andere oplossingen  
 
programming4us programming4us