Πώς να σώσει μια εικόνα σε μια βάση δεδομένων με MS Visual Basic 6

βάση δεδομένων αποθηκεύει εικόνες σε δυαδική μορφή , ώστε να μπορείτε να εμφανίσετε τις εικόνες σε μια ιστοσελίδα ή μια φόρμα των Windows . Η γλώσσα Visual Basic έχει μια σύνταξη σύνδεση που σας επιτρέπει να συνδεθείτε με τη βάση δεδομένων , διευκρινίζουν ότι οι πληροφορίες είναι μια εικόνα και αποθηκεύστε το σε ένα από τα τραπέζια σας . Η εικόνα μπορεί να είναι ένα από μια ιστοσελίδα ή να βρίσκεται στον τοπικό σκληρό δίσκο . Οι εικόνες είναι μεγάλα αντικείμενα , έτσι ώστε οι πίνακες χρειάζονται αρκετό χώρο για να αποθηκεύσετε τα δυαδικά αρχεία . Με αρκετό χώρο στο σκληρό δίσκο, μπορείτε να δημιουργήσετε ένα μεγάλο αρχείο εικόνας για τη Visual Basic 6 αίτησή σας . Οδηγίες
Η 1

Δημιουργήστε ένα αντικείμενο ροής μνήμης και να την αντιστοιχίσετε στην εικόνα . Το ρεύμα της μνήμης διαβάζει τα δυαδικά δεδομένα από την εικόνα και το αποθηκεύει στη μνήμη . Αυτή η δυαδικά δεδομένα αργότερα μεταφέρεται σε ένα δυαδικό συστοιχία . Ο παρακάτω κώδικας δημιουργεί το ρεύμα μνήμη και αποθηκεύει την εικόνα :

Dim ms Ως νέα MemoryStream ( ) theImage.Save ( ms , theImage.RawFormat )

" theImage " είναι το αναγνωριστικό της εικόνας που βρίσκεται στην φόρμα της Visual Basic σας . Σημεία Αυτό το στοιχείο της εικόνας σε μια τοποθεσία μιας εικόνας στο σκληρό δίσκο . 2

Δημιουργήστε τη σύνδεση βάσης δεδομένων και SQL ερώτημα που εισάγει την εικόνα στη βάση δεδομένων . Η σύνδεση που δημιουργείτε εξαρτάται από τον server που χρησιμοποιείτε . Ο παρακάτω κώδικας δημιουργεί τη σύνδεση και δημιουργεί την « εισαγωγή » ερώτημα :

Dim conn As New SqlConnection ( string_connection ) Dim ερώτημα As String = " εισάγετε στο Picture_Table τιμές ( εικόνα ) ( @ Picture ) " Dim εντολή Όπως νέα SqlCommand (ερώτημα , conn )
εικόνων 3

Ρυθμίστε την παράμετρο εικόνα για την εντολή ερώτημα . Ο παρακάτω κώδικας δημιουργεί μια παράμετρο για το SQL κώδικα και αποδίδει την εικόνα :

Δημ. byteArray ( ) Όπως Byte = ms.GetBuffer ( ) command.Parameters.Add ( New SqlParameter ( "@ Picture " , SqlDbType . εικόνα ) ) . Value = byteArray
Η 4

Εκτελέστε το ερώτημα και να αποθηκεύσετε την εικόνα στη βάση δεδομένων . Όλες οι παράμετροι , αλλά η εικόνα δεν σώζεται στη βάση δεδομένων . Ο κώδικας που ακολουθεί ανοίγει τη σύνδεση βάσης δεδομένων , εκτελεί τον κώδικα SQL και αποθηκεύει την εικόνα στον πίνακα της βάσης δεδομένων :

conn.Open ( ) command.ExecuteNonQuery ( ) conn.Close ( )
Η

Η