INSERT INTO MaTable (ID, Action) VALUES (@p1,@p2)
Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load MaTableTableAdapter.Insert("test", "test") End Sub End Class
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _ Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlServerCe.SqlCeDataAdapter Get If (Me._adapter Is Nothing) Then Me.InitAdapter End If Return Me._adapter End Get End Property
Une exception de première chance de type 'System.Data.SqlServerCe.SqlCeException' s'est produite dans System.Data.SqlServerCe.dll
Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Try Dim SQLConn = New SqlConnection(), cmd As String SQLConn.ConnectionString = "Data Source=|DataDirectory|\BDD.sdf;Initial Catalog=Ping" SQLConn.Open() cmd = "INSERT INTO MaTable (ID, Action) VALUES ('TEST', 'TEST')" Dim Command = New SqlCommand(cmd, SQLConn) Command.ExecuteNonQuery() SQLConn.Close() Catch ex As Exception MsgBox(ex.Message) End End Try End Sub
Une erreur liée au réseau ou spécifique à l'instance s'est produite lors de l'établissement d'une connexion à SQL Server. Le serveur est introuvable ou n'est pas accessible. Vérifiez que le nom de l'instance est correct et que SQL Server est configuré pour autoriser les connexions distantes. (provider: SQL Network Interfaces, error: 26 - Erreur lors de la localisation du serveur/de l'instance spécifiés)
Imports System.Data Imports System.Data.SqlClient Imports System.Data.SqlServerCe Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim sqlcon As New SqlCeConnection("Data Source=D:\Users\u165147\documents\visual studio 2010\Projects\WindowsApplication5\WindowsApplication5\Database1.sdf") Dim sqlcmd As New SqlCeCommand, sqltext As String Try sqlcon.Open() sqltext = "INSERT INTO [table](ID, Nom) VALUES ('coucou','coucou')" sqlcmd.CommandText = sqltext sqlcmd.Connection = sqlcon sqlcmd.ExecuteNonQuery() sqlcon.Close() Catch ex As Exception MsgBox(ex.Message) End Try End Sub End Class
"Data Source=|DataDirectory|\Database1.sdf"