Código HTML:
Dim Cn As OleDb.OleDbConnection Dim Orden As OleDb.OleDbCommand Cn = New OleDb.OleDbConnection("Provider=SQLOLEDB;Data Source=FORGE ;User id=custodia;password=custodia;initial catalog=custodia") Dim Cadena, idpais, nombre As String Cadena = "insert into paises(idpais,nombre) values(@idpais, @nombre)" Orden = New OleDb.OleDbCommand(Cadena, Cn) Orden.Parameters.Add(New OleDb.OleDbParameter("@idpais", OleDb.OleDbType.Integer)) Orden.Parameters("@idpais").Value = idpais Orden.Parameters.Add(New OleDb.OleDbParameter("@nombre", OleDb.OleDbType.VarWChar, 20)) Orden.Parameters("@nombre").Value = nombre Orden.Connection.Open() Orden.ExecuteNonQuery() Orden.Connection.Close() Response.Write("El dato ha sido grabado con exito!!!")