Mas haris siswoyo ... berarti kita ngga bisa tetap menyimpan char "'"
yah ? kira², adakah cara lain mas dengan tidak mereplace ' menjadi "
karena kedua karakter tersebut terkadang muncul bersamaan di dalam
satu email. 
Makasih banyak atas masukannya mas ...

Regards,
Indra
--- In [email protected], "harisiswoyo" <[EMAIL PROTECTED]> wrote:
>
> 
> Dear Bapak Picka Phiccolo,
> 
> Replace karakter ' dengan double '' bukan " lho.
> StrSQL = Replace(StrSql, "'", "''")
> 
> Regards
> 
> 
> 
> --- In [email protected], "Picka" <Phiccolo@> wrote:
> >
> > Mas mas mbak mbak..
> > 
> > saya membuat program sederhana untuk ngiputin data email ke sebuah
> > program.
> > saya mendapatkan error message sewaktu akan menyimpan isi email saya
> > yang saya paste kan di richtextbox.
> > 
> > Saya menggunakan vb6 dan database access2000
> > errornya ternyata diebabkan oleh saya yang menyimpan karakter (') pada
> > richtextbox.
> > 
> > ini bagian yang error
> > 
> >                 Else
> >                     sql2 = "insert into email" _
> >                     &
> >
>
"([no],[project],[subject],[datesubmit],[datecomplete],[status],[request],[location],[email],[emailcontent])"
> > _
> >                     & "values ('" & Text1 & "','" & Combo1 & "','" &
> > Text2 & "','" & Text3 & "', '" _
> >                     & Text4 & " ', '" & Combo2 & "','" & Text5 & "','"
> > & Text6 & "','" & Text7 & "','" & RichTextBox1 & "')"
> >                     Koneksi.Execute sql2, , adCmdText
> >                     rsemail.Requery
> >                 End If
> > 
> > mohon bantuan saudara² agar program saya ini dapat menyimpan spesial
> > karakter ini.
> > 
> > Terimakasih
> >
>


Kirim email ke