Méthode SqlCeResultSet.SetDecimal

Affecte à la colonne spécifiée la valeur Decimal passée.

Espace de noms :  System.Data.SqlServerCe
Assembly :  System.Data.SqlServerCe (en System.Data.SqlServerCe.dll)

Syntaxe

'Déclaration
Public Sub SetDecimal ( _
    ordinal As Integer, _
    value As Decimal _
)
'Utilisation
Dim instance As SqlCeResultSet
Dim ordinal As Integer
Dim value As Decimal

instance.SetDecimal(ordinal, value)

public void SetDecimal(
    int ordinal,
    decimal value
)

public:
void SetDecimal(
    int ordinal, 
    Decimal value
)

member SetDecimal : 
        ordinal:int * 
        value:decimal -> unit 

public function SetDecimal(
    ordinal : int, 
    value : decimal
)

Paramètres

• ordinal
  Type : System.Int32
  Position ordinale de la colonne à définir.

• value
  Type : System.Decimal
  Valeur à assigner à la colonne spécifiée.

Notes

La colonne sous-jacente doit être de type decimal ou numeric.

Une exception est levée si la ligne n'est pas marquée comme modifiable.

Une exception est levée si aucun champ n'existe à la position spécifiée.

Exemples

Dim conn As SqlCeConnection = Nothing

Try
    File.Delete("Test.sdf")

    Dim engine As New SqlCeEngine("Data Source = Test.sdf")
    engine.CreateDatabase()

    conn = New SqlCeConnection("Data Source = Test.sdf")
    conn.Open()

    Dim cmd As SqlCeCommand = conn.CreateCommand()
    cmd.CommandText = "CREATE TABLE myTable (col1 INT, col2 MONEY, col3 NVARCHAR(200))"
    cmd.ExecuteNonQuery()

    ' For optimal performance use base table access
    '
    cmd.CommandText = "myTable"
    cmd.CommandType = CommandType.TableDirect

    Dim rs As SqlCeResultSet = cmd.ExecuteResultSet(ResultSetOptions.Updatable Or ResultSetOptions.Scrollable)

    Dim rec As SqlCeUpdatableRecord = rs.CreateRecord()

    ' Insert two records
    '
    rec.SetInt32(0, 34)
    rec.SetDecimal(1, System.Convert.ToDecimal(44.66))
    rec.SetString(2, "Sample text 1")

    rs.Insert(rec)

    rec.SetInt32(0, 35)
    rec.SetDecimal(1, System.Convert.ToDecimal(94.25))
    rec.SetString(2, "Sample text 2")

    rs.Insert(rec)
Catch e As Exception
    MessageBox.Show(e.Message)
Finally
    conn.Close()
End Try

SqlCeConnection conn = null;

try
{
    File.Delete("Test.sdf");

    SqlCeEngine engine = new SqlCeEngine("Data Source = Test.sdf");
    engine.CreateDatabase();

    conn = new SqlCeConnection("Data Source = Test.sdf");
    conn.Open();

    SqlCeCommand cmd = conn.CreateCommand();
    cmd.CommandText = "CREATE TABLE myTable (col1 INT, col2 MONEY, col3 NVARCHAR(200))";
    cmd.ExecuteNonQuery();

    // For optimal performance use base table access
    //
    cmd.CommandText = "myTable";
    cmd.CommandType = CommandType.TableDirect;

    SqlCeResultSet rs = cmd.ExecuteResultSet(ResultSetOptions.Updatable | 
        ResultSetOptions.Scrollable);

    SqlCeUpdatableRecord rec = rs.CreateRecord();

    // Insert two records
    //
    rec.SetInt32(0, 34);
    rec.SetDecimal(1, (decimal)44.66);
    rec.SetString(2, "Sample text 1");

    rs.Insert(rec);

    rec.SetInt32(0, 35);
    rec.SetDecimal(1, (decimal)94.25);
    rec.SetString(2, "Sample text 2");

    rs.Insert(rec);
}
catch (Exception e)
{
    MessageBox.Show(e.Message);
}
finally
{
    conn.Close();
}

Voir aussi

Référence

SqlCeResultSet Classe

Espace de noms System.Data.SqlServerCe