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!!!")
 
 
 
