Πρόβλημα με Query

[frikoulo]

Καλησπέρα παιδιά. Έχω το εξής πρόβλημα:

 

Προσπαθώ να αντιγράψω ένα πεδίο απο ένα table σε ένα αντίστοιχο ενός άλλου. Το πρόβλημα που προκύπτει είναι οτι στα values του πεδίου που προσπαθώ να αντιγράψω υπάρχει το ' το οποίο προκαλεί πολλά προβλήματα.

Το query τρέχει μέσα απο VB. Σας παραθέτω τον κώδικα του :

>

   Dim cinema_rs As Variant
   Dim cinema_str As String
   Dim events_rs As Variant
   Dim events_str As String
   
   cinema_str = "SELECT * FROM CINEMAS.DBO.MOVIES;"
   Set cinema_rs = Conn.Execute(cinema_str)
   
   While Not cinema_rs.EOF
       
       events_str = "UPDATE EVENTS_DATA_tmp " & _
                   "SET full_story ='" & cinema_rs("synopsis") & "' " & _
                   "WHERE original_title ='" & cinema_rs(en_title) & "' OR title ='" & cinema_rs("gr_title") & "';"
       Set events_rs = Conn.Execute(events_str)
   
       cinema_rs.MoveNext
   Wend

 

Το πρόβλημα είναι οτι εδώ '" & cinema_rs(en_title) & "' μόλις εμφανιστεί το ' μέσα στο en_title κλείνει το ' και βγάζει error..

Καμιά ιδέα ?

 

EDIT: Σε Visual Basic 6 γράφω τον κώδικα

[alex2005]

Δεν έχω ιδέα τι γίνεται στην VB, αλλά στην Java αν χρησιμοποιείς Prepared Statement όλα τα quotes θα αντικατασταθούν αυτόματα με τα αντίστοιχα escape characters.

Οπότε σου προτείνω να ψάξεις να δεις αν υπάρχει κάτι αντίστοιχο για VB.....δηλαδή Prepared Statements.

[frikoulo]

χμ... το ψάχνω!

[ntaryl]

Αν καταλαβα καλα χρησιμοποιεις visual basic and DB.

Ελπιζω καποιος να σε βοηθησει σε αυτο

Συγνωμη αλλα ποτε δεν εχω ασχοληθει με DB

καλο απογευμα

[frikoulo]

Τελικά έκανα το εξής και τέλειωσε γρήγορα και αποτελεσματικά.

 

Άνοιξα μια access, έκανα import και linked τα δυο tables απο τον SQL Server και είπα στην access να κάνει τo update, ενώ εγώ έβαλα μόνο τα κριτήρια...