609
צפיות
צפיות
13
תשובות
תשובות
עברית באקסס
היי
יש לי בעיה עם עברית ב-ACCESS.
יש לי דף ASP הקולט נתונים לבסיס הנתונים, הבעיה היא שאני רואה ג'יבריש בטבלת האקסס, יש למישהו פיתרון?
האקסס בעברית.
תודה.
היי
יש לי בעיה עם עברית ב-ACCESS.
יש לי דף ASP הקולט נתונים לבסיס הנתונים, הבעיה היא שאני רואה ג'יבריש בטבלת האקסס, יש למישהו פיתרון?
האקסס בעברית.
תודה.
13 תשובות
הנה:
אם אתה כותב ב-VBS :
<%@ Language="VBScript" codpepage=1255
ואם אתה כותב ב-JS
<%@ Language="JavaScript" codePage=1255
עברית באקסס
היי
תודה על התשובה אבל הבעיה ממשיכה.
אולי אני טועה במשהו כמו מקום הקוד?
תודה.
בראש העמוד
לפני כל שורת קוד אחרת
אם יש לך ג'יבריש במסד עצמו
אז הוא לא ממש שווה משהו.
פעם מצאתי דרך להמיר ג'יבריש לעברית אבל לא ממש זוכר איך.
אתה צריך לשים את שורת הקוד שכתבו לך בשורה הראשונה בעמוד שלך על מנת שתוכל להוסיף ולשלוף נתונים מהמסד בעברית.
השורת קוד היא תיקון לבעיית הצגת ג'יבריש בעמוד כאשר הנתונים באקסס הם בעברית.
מה זאת אומרת המסד לא שווה משהו.
היי
יצרתי המון מסדי נתונים ללא כל בעיה, ובאותה הצורה בניתי את זה.
אני לא יודע אם זה ג'יבריש בדיוק, זה # ומספרים.
בדפי ה-ASP עצמם אני רואה בסדר גמור.
ניסיתי המון דברים ושום דבר לא עזר,אולי למישהו יש פתרון בכל זאת?
תודה על העזרה.
הנתונים שלך הם לא בג'יבריש
הם בסימוני ASCII או יוניקוד אני לא ממש בטוח איזה מהם.
אין לך ממה לדאוג ממש. איך אתה מכניס את הנתונים למסד בדיוק ?
ASCII
היי
אני מכניס את הנןנים בצורה הבאה:
….
sTopic = prepStringForSQL(Request("Topic")) & ","
sName = prepStringForSQL(sName) & ","
sEmail= prepStringForSQL(sEmail) & ","
sComments = ReplaceComments(Request("Message"))
sComments = prepStringForSQL(sComments)
sSQL = "INSERT INTO FORUM_MESSAGES (AUTHORNAME,AUTHOREMAIL,TOPIC,COMMENTS) VALUES (" & sName & sEmail & sTopic & sComments & ")"
…..
תודה.
מה מכילה הפונקציה
prepStringForSQL והאם אתה שם בעמוד הזה קידוד כמו שנכתב קודם ?
(את הקידוד צריך לכתוב גם בהכנסה וגם בשליפה)
קידוד
היי
להלן הפונקציה prepStringForSQL:
Function prepStringForSQL(sValue)
Dim sAns
sAns = Replace(sValue, Chr(39), """)
sAns = "'" & sAns & "'"
prepStringForSQL = sAns
End Function
תודה.
למה אתה לא מיישר את הקוד שלך לשמאל?
קוד יותר פשוט שהופך  למשל לאות
function asctochr(asciicode)
dim str,str1
str = split(asciicode,"&#")
for each xit in str
str(xit) = replace(str(xit),str(xit),chr(str(xit)))
next
str1 = join(str," ")
asctochr = str1
end function
&# 127 הופך לאות
תהפכו את & ל&
גררררר
ל&