Мы все знаем, что ACCESS является близким партнером ASP. Потому что две самые простые вещи, когда встречаются вместе, всегда порождают искры. Однако, если наша фильтрация не является строгой, часто появляются японские символы. В это время после поиска происходит переполнение японского языка. В настоящее время мы обычно можем подумать о том, чтобы найти exe-программу для решения этой проблемы. Первоначально я написал такую подобную программу на C#.
Вы сможете найти в Google то, что я написал ранее. Я больше ничего не скажу.
И вот однажды я обнаружил, что ASP может это сделать. В то время я действительно чувствовал себя дерьмом.
Однако этот метод ASP очень плох. Легко вызвать сбой системы (если база данных большая).
Так что просто пишу сюда. Его можно рассматривать как отправную точку.
«Позвольте мне объяснить это ниже:
Функция TransferJapanDc9CnInDB()
При ошибке Возобновить Далее
Ошиб.Очистить
Dim objRS,i
Установите objRS=Server.CreateObject(ADODB.Recordset)
objRS.CursorType = adOpenKeyset
objRS.LockType = adLockReadOnly
objRS.ActiveConnection=objConn
objRS.Source=SELECT * FROM [blog_Comment]
objRS.Open()
Если (Не objRS.bof) И (Не objRS.eof) Тогда
Для i=1 для objRS.RecordCount
«Пройдите и посмотрите, есть ли текст на японском языке. Если да, то просто найдите что-нибудь. Неважно, что вы ищете. Поскольку он пересекает ACCESS, пока указатель перемещается на японский язык, он будет переполняться.
objConn.Execute(SELECT * FROM [blog_Comment] WHERE comm_ID=&objRS(comm_ID)& AND [comm_Content] LIKE '%URL%')
Если Номер ошибки=-2147217900 Тогда
«Поскольку ошибка продолжается, здесь находится код ошибки переполнения. Он отлажен мной и на самом деле нигде не найден.
objConn.Execute(UPDATE [blog_Comment] SET [comm_Content]='&FilterSQL(Japan2Html(objRS(comm_Content)))&',[comm_Author]='&FilterSQL(Japan2Dc9CnHtml(objRS(comm_Author)))&' WHERE comm_ID=&objRS(comm_ID )& )
«Это замена японского текста, не правда ли, очень умная идея?» доброта. Однако если база данных станет огромной, повторное переполнение вызовет проблемы. Младенцы памяти будут плакать.
Ошиб.Очистить
Конец, если
objRS.MoveNext
Следующий
Конец, если
objRS.Close
Установить objRS=Ничего
'www.dc9.cn 11.07.28
Конечная функция
Функция Japan2Dc9CnHtml (источник)
источник = Заменить (источник,ガ,ガ)
источник=Заменить(источник,ギ,ギ)
источник=Заменить(источник,ア,ア)
источник=Заменить(источник,ゲ,ゲ)
источник=Заменить(источник,ゴ,ゴ)
источник = Заменить (источник,ザ,ザ)
источник = Заменить (источник,ジ,ジ)
источник=Заменить(источник,ズ,ズ)
источник=Заменить(источник,ゼ,ゼ)
источник=Заменить(источник,ゾ,ゾ)
источник=Заменить(источник,ダ,ダ)
источник = Заменить (источник,ヂ,ヂ)
источник=Заменить(источник,ヅ,ヅ)
источник = Заменить (источник, デ, デ)
источник = Заменить (источник,ド,ド)
источник = Заменить (источник, バ, バ)
источник = Заменить (источник, パ, パ)
источник = Заменить (источник,ビ,ビ)
источник = Заменить (источник,ピ,ピ)
источник = Заменить (источник, ブ, ブ)
источник = Заменить (источник, ブ, ブ)
источник=Заменить(источник,プ,プ)
источник=Заменить(источник,ベ,ベ)
источник=Заменить(источник,ペ,ペ)
источник=Заменить(источник,ボ,ボ)
источник = Заменить (источник, ポ, ポ)
источник=Заменить(источник,ヴ,ヴ)
Japan2Html=источник
Конечная функция
Кстати, мой блог в последнее время неоднократно взламывали, что меня очень расстраивает. Поскольку это делают арабы или израильтяне, я не могу общаться.
Я до сих пор не могу понять, как они это сделали.
Действительно удручающе.
хорошо.
в последующие дни. Я опубликую еще несколько технических постов. Я вдруг почувствовал, что это место очень ценно.