buongiorno oregon,
purtroppo non cambia nulla!
codice:
Dim create As String
Dim eng As SqlCeEngine
eng = New SqlCeEngine("Data Source=" + db)
eng.CreateDatabase()
create = "CREATE TABLE ore(Giorno nvarchar(20) PRIMARY KEY not null,Causale nvarchar(20) not null,Entrata nvarchar(30) not null,Uscita nvarchar(30) not null,Totale nvarchar(30) not null)"
ExecSql(create)
create = ("CREATE TABLE ferie(Data nvarchar(20) PRIMARY KEY not null,Giorni nvarchar(20) not null,Altro nvarchar(30) not null,Rimanenza nvarchar(30) not null,Residuo nvarchar(30) not null)")
ExecSql(create)
create = "CREATE TABLE riepilogo(Congedo nvarchar(20) PRIMARY KEY not null,Malattia nvarchar(100) not null,Pr nvarchar(30) not null,L104 nvarchar(30) not null,Malattia nvarchar(30) not null)"
ExecSql(create)
Me.Close()
sono sempre 2