This commit is contained in:
ms
2019-05-07 17:02:34 +02:00
parent b2f61df354
commit f2d5c20559
46 changed files with 7788 additions and 275 deletions

View File

@@ -6,8 +6,10 @@ Public Class EintragBearbeiten
Public cmd As New SqlCommand
Public reader As SqlDataReader
Public Rubrik As String = Main.SenderRubrik
Public Titel As String = Main.SenderTitel
' Public Rubrik As String = Main.SenderRubrik
'Public Titel As String = Main.SenderTitel
Property rubrik As String = ""
Property Titel As String = ""
Public abfrage As String
Public Linked As String
Public LinkedWith As String
@@ -118,7 +120,7 @@ Public Class EintragBearbeiten
con.Close()
geaendert = False
If NameChanged = True Then
Folder.FolderMove(Rubrik, Titel, TxtRubrik.Text, TxtTitel.Text)
cFolder.FolderMove(Rubrik, Titel, TxtRubrik.Text, TxtTitel.Text)
End If
NameChanged = False
End If
@@ -301,7 +303,7 @@ Public Class EintragBearbeiten
Private Sub CmdLink_Click(sender As Object, e As EventArgs) Handles CmdLink.Click
Main.startlink()
Ext_Programme.startlink(TxtLink.Text)
End Sub
Private Sub ChkKennwortAnzeigen_CheckedChanged(sender As Object, e As EventArgs) Handles ChkKennwortAnzeigen.CheckedChanged