ذخيره فارسي داخل اكسس
سلام!
من با استفاده از كد زير چند فيلد را توي ديتا بيس اكسس ذخيره ميكنم
ولي مشكل اينه كه داخل اكسس فارسي نمياد و كد ميشه
همين باعث ميشه كه توي كد سرچ حرف به حرف من خوانده نشه!
چي كار كنم كه فارسي داخل اكسس ذخيره بشه؟!
dsn = "DBQ=" & Server.Mappath("News.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"
Set Conn = Server.CreateObject("ADODB.Connection")
Set objRs = Server.CreateObject("ADODB.Recordset")
Conn.Open dsn
if D="pic" then SQL = "SELECT * FROM pic" end if
if D="music" then SQL = "SELECT * FROM music" end if
if D="film" then SQL = "SELECT * FROM film" end if
if D="sher" then SQL = "SELECT * FROM sher" end if
if D="dl" then SQL = "SELECT * FROM dl" end if
if D="lerning" then SQL = "SELECT * FROM lerning" end if
if D="web" then SQL = "SELECT * FROM web" end if
objrs.Open SQL, Conn, 1, 3
while not(objrs.eof)
objrs.movenext
wend
objrs.addnew
objrs ("news")=Comment
objrs ("Title")=Title
objrs ("Date")=session("Date")
objrs.update
objrs.close
set objrs=nothing
Conn.close
set Conn=nothing
جواب بصورت نقل قول
