SQL1.ExecNonQuery("DROP TABLE IF EXISTS" & ayir2(0) & ")
SQL1.ExecNonQuery("CREATE TABLE" & ayir2(0) & "(Nummer TEXT , Name TEXT, Mesaj TEXT , LinkAdres TEXT, Datum TEXT)")
SQL1.ExecNonQuery2("INSERT INTO" & ayir2(0) & "VALUES(?,?,?,?,?)", Array As Object(ayir2(0), ayir2(1), ayir2(2), ayir2(3),ayir2(4)))