δώσε μας το script του πίνακα (CREATE TABLE) τόσο σε SQL όσο και σε MySQL 

Antonios Chatzipavlis:

δώσε μας το script του πίνακα (CREATE TABLE) τόσο σε SQL όσο και σε MySQL 

Παναγιώτης Καναβός:

Δεν διόρθωσες το πρόβλημα, και περιττό να πούμε ότι τέτοια πράγματα δεν συμβαίνουν αν δεν έχει γίνει κάτι στραβό. Δοκίμασες να βάλεις την τιμή καρφωτή? Αν αυτό παίζει, το πρόβλημα βρίσκεται στα δεδομένα που διαβάζεις. Μήπως διαβάζεις τα αρχικά δεδομένα ως text και προσπαθείς να τα αποθηκεύσεις ως decimal? Αν συμβαίνει αυτό και το μηχάνημα σου ή ο SQL Server έχει ελληνικό locale, το '.' είναι η χιλιάδα και ο SQL θα προσπαθήσει να κάνει την αντίστοιχη μεαταρτατροπή.

Καταρχήν, βεβαιώσου ότι το πεδίο "total" του datatable είναι όντως αριθμητικό (decimal, float, double). Πρόσεξε όμως, ότι αν δεν είναι decimal, μπορεί λόγω rounding errors η τιμή που προσπαθείς να στείλεις να μην είναι ακριβώς αυτή που έχεις δώσει αλλά να συνοδεύεται από Ν 9άρια. Μετά, βάλε τον SQL Server Profiler για να δεις τί ακριβώς εντολές στέλνονται στον SQL Server. 

adapter = New MySqlDataAdapter(sql, cnDest)
dSet = New DataSet
adapter.Fill(dSet)
και μετά όπως έγραψα και παραπάνω..

Dim p43 As New SqlParameter("@total", SqlDbType.Decimal)
p43.Precision = 4
p43.Size = 15

'parakatw...
Dim myDataRow As DataRow

For Each myDataRow In dSet.Tables(0).Rows

   'as poyme pws exei mono ayto to field..
   sql = "INSERT INTO [order](total) VALUES(@total)"
 
   With cmd
      p43.Value = IIf(IsDBNull(myDataRow("total")), DBNull.Value, myDataRow("total"))
      .Parameters.Add(p43)
      .CommandText = sql
      .ExecuteNonQuery()

      .Parameters.Clear()
   End With

Next

3. Υπάρχει όμως κάποιος συγκεκριμένος τρόπος για να δω αν το πεδίο  "total" είναι αριθμητικό στο datatable? Γιατί και πως όμως να το έχει αλλάξει; 

πάντως επειδή είδα ότι και το money δίνει 4 δεκαδικά ψηφία, το έβαλα και βλέπω πως εμφανίζει σωστά τους αριθμούς μέσα στον MSSQL.

Αυτό με τον Profiler θα το κάνω και θα γράψω τα αποτελέσματα. 

Αν έως τότε κάποιος έχει κάποια διόρθωση-παρατήρηση ευχαριστώ εκ των προτέρων.

Αντί να γράψεις εσύ την διαδικασία μεταφοράς των δεδομένων δοκίμασες να την κάνεις με τον import wizard ή με κάποιο δικό σου SQL Server Integration Package?

Λογικά θα μεταφερθούνε σαν νεράκι.

Όσον αφορά το datatype money, αυτό πλέον είναι για σκοπούς συμβατότητας στο σύντομο μέλλον θα καταργηθεί για αυτό καλύτερα decimal

Με τα SQL Server Integration Services μπορείς να καλέσεις και web services και φυσικά να τα έχεις scheduled. Θα σου έλεγα να τους ρίξεις μια ματιά...

Harkon:

'mazi me oles tis params exoyme kai ayti pou me endiaferei
Dim p43 As New SqlParameter("@total", SqlDbType.Decimal)
p43.Precision = 4
p43.Size = 15

Markos:

Harkon:

'mazi me oles tis params exoyme kai ayti pou me endiaferei
Dim p43 As New SqlParameter("@total", SqlDbType.Decimal)
p43.Precision = 4
p43.Size = 15

Αν και θα πρέπει να ακολουθήσεις τις οδηγίες του Αντώνη, για το συγκεκριμένο πρόβλημα έχω την εντύπωση ότι έχει παρερμηνευτεί το context των SqlParameter properties, Size, Scale και Precision.

Precision: Gets or sets the maximum number of digits used to represent the Value property.
Scale: Gets or sets the number of decimal places to which Value is resolved.
Size: Gets or sets the maximum size, in bytes, of the data within the column.

Μάλλον, πρέπει να βάλεις Precision=15, Scale=4 και να "σβήσεις" την Size.