Version =20
VersionRequired =20
Checksum =-574369906
Begin Form
    AllowDesignChanges = NotDefault
    DefaultView =0
    TabularFamily =0
    PictureAlignment =2
    DatasheetGridlinesBehavior =3
    GridY =10
    Width =11281
    DatasheetFontHeight =10
    ItemSuffix =1
    DatasheetGridlinesColor =12632256
    RecSrcDt = Begin
        0x3230050eac89e440
    End
    RecordSource ="qry_EmailPostfachanlegen"
    DatasheetFontName ="Arial"
    Begin
        Begin Label
            BackStyle =0
            FontName ="Tahoma"
        End
        Begin CommandButton
            Width =1701
            Height =283
            FontSize =8
            FontWeight =400
            ForeColor =-2147483630
            FontName ="Tahoma"
        End
        Begin TextBox
            FELineBreak = NotDefault
            SpecialEffect =2
            OldBorderStyle =0
            Width =1701
            LabelX =-1701
            FontName ="Tahoma"
            AsianLineBreak =255
        End
        Begin ComboBox
            SpecialEffect =2
            Width =1701
            LabelX =-1701
            FontName ="Tahoma"
        End
        Begin Section
            Height =6720
            BackColor =-2147483633
            Name ="Detailbereich"
            GUID = Begin
                0x9515c1d83cffe54a8fdc915ba6c91696
            End
            Begin
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =795
                    Width =4590
                    Height =225
                    TabIndex =2
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    Name ="username"
                    ControlSource ="username"
                    OnExit ="[Event Procedure]"
                    FontName ="MS Sans Serif"
                    GUID = Begin
                        0x7570042c421c844695a4240d91d26785
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =795
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="username_Bezeichnungsfeld"
                            Caption ="username"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0xcabafa1c900bbd4698029154ff74a312
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =1308
                    Width =4590
                    Height =225
                    TabIndex =3
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    Name ="login"
                    ControlSource ="login"
                    FontName ="MS Sans Serif"
                    GUID = Begin
                        0x7dc4d16cb4303a4ea50b0ec65a584314
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =1308
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="login_Bezeichnungsfeld"
                            Caption ="login"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0x556f95b10acd544cbb11163ca1ea5707
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =3360
                    Width =4590
                    Height =225
                    TabIndex =6
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    Name ="name"
                    ControlSource ="name"
                    FontName ="MS Sans Serif"
                    GUID = Begin
                        0x4c9ca90b7d60fb4281a519546b317bc8
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =3360
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="name_Bezeichnungsfeld"
                            Caption ="name"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0x8476d3fd3fc423419013f111b9b4d824
                            End
                        End
                    End
                End
                Begin TextBox
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =3873
                    Width =4590
                    Height =225
                    TabIndex =7
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    Name ="active"
                    ControlSource ="active"
                    DefaultValue ="=1"
                    FontName ="MS Sans Serif"
                    GUID = Begin
                        0x330279502d031142bbc51ae578479c67
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =3873
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="active_Bezeichnungsfeld"
                            Caption ="active"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0x341326e787067d41a2834f94417a2703
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =4215
                    Width =4590
                    Height =225
                    TabIndex =8
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    Name ="Angelgt_von"
                    ControlSource ="Angelgt_von"
                    FontName ="MS Sans Serif"
                    GUID = Begin
                        0xff2fb226a4064545988e6fed88aa0490
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =4215
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="Angelgt_von_Bezeichnungsfeld"
                            Caption ="Angelgt_von"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0x41fbbc73e5713e4f972b7858bb5ea8e8
                            End
                        End
                    End
                End
                Begin TextBox
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =4755
                    Width =4590
                    Height =225
                    TabIndex =9
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    Name ="created"
                    ControlSource ="created"
                    DefaultValue ="=Datm()"
                    FontName ="MS Sans Serif"
                    GUID = Begin
                        0x49087f2eee06ee488627c41db9f9139e
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =4755
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="created_Bezeichnungsfeld"
                            Caption ="created"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0x7aa63001638dd7448bc9772d20b2c59d
                            End
                        End
                    End
                End
                Begin TextBox
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =5097
                    Width =4590
                    Height =225
                    TabIndex =10
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    Name ="modified"
                    ControlSource ="modified"
                    FontName ="MS Sans Serif"
                    GUID = Begin
                        0x653d7ae7fb724f46a3335c14b0dba485
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =5097
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="modified_Bezeichnungsfeld"
                            Caption ="modified"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0x5f676374b62ae84c88f413ddc90bf3ec
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =5952
                    Width =4590
                    Height =225
                    TabIndex =11
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    Name ="quota"
                    ControlSource ="quota"
                    DefaultValue ="=0"
                    FontName ="MS Sans Serif"
                    GUID = Begin
                        0x4deae714de33b84789ba724180bf9498
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =5952
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="quota_Bezeichnungsfeld"
                            Caption ="quota"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0x11c7f04ac43f28408541f17bcd7dad3d
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =6465
                    Width =4590
                    Height =225
                    TabIndex =12
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    Name ="local_part"
                    ControlSource ="local_part"
                    FontName ="MS Sans Serif"
                    GUID = Begin
                        0xdcfb9d9752e065408a431d86e6abce06
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =6465
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="local_part_Bezeichnungsfeld"
                            Caption ="local_part"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0xe7158c22a538ab4c8e82aec5d398993b
                            End
                        End
                    End
                End
                Begin ComboBox
                    LimitToList = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1620
                    Top =392
                    Width =4590
                    Height =225
                    TabIndex =1
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    ColumnInfo ="\"\";\"\";\"10\";\"510\""
                    GUID = Begin
                        0xd8cb66ee0ce9c049b50b449dc15193bf
                    End
                    Name ="domain"
                    ControlSource ="domain"
                    RowSourceType ="Table/Query"
                    RowSource ="qry_EmaiDomain"
                    OnExit ="[Event Procedure]"
                    FontName ="MS Sans Serif"
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =392
                            Width =1560
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="Bezeichnungsfeld27"
                            Caption ="domain"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0xce39a5846439ed4f8c347de4073bc575
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1620
                    Width =4590
                    Height =225
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    Name ="Prefix"
                    FontName ="MS Sans Serif"
                    GUID = Begin
                        0xaec587437d999a428b570f28a6fd9704
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Width =1560
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="Bezeichnungsfeld13"
                            Caption ="Prefix anlegen"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0x6b22d8e3a80ce8498e7c483f4a76a177
                            End
                        End
                    End
                End
                Begin ComboBox
                    LimitToList = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =2334
                    Width =4590
                    Height =225
                    TabIndex =5
                    BoundColumn =1
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    ColumnInfo ="\"\";\"\";\"10\";\"510\""
                    GUID = Begin
                        0x0d2539f60f2d8c468dad40868019a475
                    End
                    Name ="password"
                    ControlSource ="password"
                    RowSourceType ="Table/Query"
                    RowSource ="qry_EmailKennwort"
                    FontName ="MS Sans Serif"
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =2334
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="password_Bezeichnungsfeld"
                            Caption ="password"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0x1705ecfa95f2fd4688e693b4d7953c82
                            End
                        End
                    End
                End
                Begin ComboBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1656
                    Top =1800
                    Width =4590
                    Height =225
                    TabIndex =4
                    BackColor =-2147483643
                    ForeColor =-2147483640
                    ColumnInfo ="\"\";\"\";\"10\";\"510\""
                    GUID = Begin
                        0xd7f77aeef9c9e247bbf84a81f38f732d
                    End
                    Name ="Passwort_Klartext"
                    ControlSource ="Passwort_Klartext"
                    RowSourceType ="Table/Query"
                    RowSource ="qry_EmailKennwort"
                    FontName ="MS Sans Serif"
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =1800
                            Width =1596
                            Height =255
                            BackColor =-2147483633
                            ForeColor =-2147483630
                            Name ="Passwort_Klartext_Bezeichnungsfeld"
                            Caption ="Passwort_Klartext"
                            FontName ="MS Sans Serif"
                            GUID = Begin
                                0x28dce425fd8f5940b9a3567f477d0b67
                            End
                        End
                    End
                End
            End
        End
    End
End
CodeBehindForm
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Compare Database

Private Sub domain_Exit(Cancel As Integer)
Me.username = Me.Prefix & "@" & Me.domain
End Sub

Private Sub username_Exit(Cancel As Integer)
Me.login = Me.username
End Sub
Private Sub Befehl0_Click()
On Error GoTo Err_Befehl0_Click


    DoCmd.GoToRecord , , acNewRec

Exit_Befehl0_Click:
    Exit Sub

Err_Befehl0_Click:
    MsgBox Err.Description
    Resume Exit_Befehl0_Click
    
End Sub