Nachrichten verbessert, Bugs beseitigt, ...

Dokumentation/Classes/cSQL.vb

@@ -50,6 +50,18 @@ Public Class cSQL
         con.Close()
     End Sub
 
+    Public Shared Sub SQLCommand(command As String)
+        Dim con As New SqlConnection
+        Dim cmd As New SqlCommand
+        con.ConnectionString = Class1.DBConString
+        cmd.Connection = con
+
+        con.Open()
+        cmd.CommandText = command
+        cmd.ExecuteNonQuery()
+        con.Close()
+    End Sub
+
 
 End Class