主頁(yè) > 知識(shí)庫(kù) > ASP代碼實(shí)現(xiàn)自動(dòng)清除替換ACCESS(MDB)數(shù)據(jù)庫(kù)的日文字符的

ASP代碼實(shí)現(xiàn)自動(dòng)清除替換ACCESS(MDB)數(shù)據(jù)庫(kù)的日文字符的

熱門標(biāo)簽:滴滴地圖標(biāo)注上車點(diǎn) 高質(zhì)量的電銷外呼系統(tǒng) 外呼系統(tǒng)怎么話費(fèi) 友邦互聯(lián)電銷機(jī)器人違法嗎 地圖標(biāo)注還可以做嗎 電銷機(jī)器人采購(gòu) 硅基電話機(jī)器人加盟 宿州防封外呼系統(tǒng)平臺(tái) 無(wú)營(yíng)業(yè)執(zhí)照地圖標(biāo)注教學(xué)
此時(shí)我們通常能想到的想法是找一個(gè)exe程序,把這個(gè)問(wèn)題解決掉。我原來(lái)用C#寫過(guò)這樣一個(gè)類似的程序。
Google里面應(yīng)該能找到我以前寫的那個(gè)。就不說(shuō)了。
后來(lái)某一天,我發(fā)現(xiàn)ASP就能實(shí)現(xiàn)。我當(dāng)時(shí)真的覺(jué)得自己太屎了。
不過(guò)ASP的這種方法很不好。容易造成系統(tǒng)崩潰(如果數(shù)據(jù)庫(kù)大)。
所以只是寫在這里。算是拋磚引玉。

'下面我解釋一下下:
Function TransferJapanDc9CnInDB()

  On Error Resume Next
  Err.Clear
  Dim objRS,i
  Set objRS=Server.CreateObject("ADODB.Recordset")
  objRS.CursorType = adOpenKeyset
  objRS.LockType = adLockReadOnly
  objRS.ActiveConnection=objConn
  objRS.Source="SELECT * FROM [blog_Comment]"
  objRS.Open()

  If (Not objRS.bof) And (Not objRS.eof) Then

    For i=1 to objRS.RecordCount
'遍歷,看看有沒(méi)有日文,如果有,就溢出了,隨便搜索一個(gè)東西就行了。搜什么無(wú)所謂。因?yàn)槭潜闅vACCESS只要指針移動(dòng)到日文就溢出。
    objConn.Execute("SELECT * FROM [blog_Comment] WHERE comm_ID="objRS("comm_ID")" AND [comm_Content] LIKE '%URL%'")
    If Err.Number=-2147217900 Then
'因?yàn)槭莖n err繼續(xù) 所以這里找到溢出的錯(cuò)誤代碼,這個(gè)是自己debug出來(lái)的,實(shí)際上不是從什么地方找的。
      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")" ")
'這個(gè)就是把日文替換一下,思路是不是很巧妙。恩。不過(guò)數(shù)據(jù)庫(kù)龐大的化,反復(fù)溢出就會(huì)很出問(wèn)題的。內(nèi)存寶寶會(huì)哭的。
      Err.Clear
    End If
    objRS.MoveNext
    Next

  End If

  objRS.Close
  Set objRS=Nothing
'www.dc9.cn 07/11/28
End Function








Function Japan2Dc9CnHtml(source)
    source=Replace(source,"ガ","ガ")
    source=Replace(source,"ギ","ギ")
    source=Replace(source,"ア","ア")
    source=Replace(source,"ゲ","ゲ")
    source=Replace(source,"ゴ","ゴ")
    source=Replace(source,"ザ","ザ")
    source=Replace(source,"ジ","ジ")
    source=Replace(source,"ズ","ズ")
    source=Replace(source,"ゼ","ゼ")
    source=Replace(source,"ゾ","ゾ")
    source=Replace(source,"ダ","ダ")
    source=Replace(source,"ヂ","ヂ")
    source=Replace(source,"ヅ","ヅ")
    source=Replace(source,"デ","デ")
    source=Replace(source,"ド","ド")
    source=Replace(source,"バ","バ")
    source=Replace(source,"パ","パ")
    source=Replace(source,"ビ","ビ")
    source=Replace(source,"ピ","ピ")
    source=Replace(source,"ブ","ブ")
    source=Replace(source,"ブ","ブ")
    source=Replace(source,"プ","プ")
    source=Replace(source,"ベ","ベ")
    source=Replace(source,"ペ","ペ")
    source=Replace(source,"ボ","ボ")
    source=Replace(source,"ポ","ポ")
    source=Replace(source,"ヴ","ヴ")
    Japan2Html=source
End Function

順便說(shuō)一下,最近我的blog反復(fù)被hack,搞得我很郁悶,因?yàn)槭前⒗嘶蛘呤且陨腥烁傻?,所以沒(méi)法溝通。
我還找不出來(lái)他們是怎么干的。
真的很郁悶。
好了。
接下來(lái)的日子里。我將再發(fā)布一些技術(shù)性的文章。突然感到這個(gè)位子很寶貴的說(shuō)。

標(biāo)簽:宣城 七臺(tái)河 雅安 江門 錫林郭勒盟 新余 儋州 廣元

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《ASP代碼實(shí)現(xiàn)自動(dòng)清除替換ACCESS(MDB)數(shù)據(jù)庫(kù)的日文字符的》,本文關(guān)鍵詞  ASP,代碼,實(shí)現(xiàn),自動(dòng),清除,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無(wú)關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《ASP代碼實(shí)現(xiàn)自動(dòng)清除替換ACCESS(MDB)數(shù)據(jù)庫(kù)的日文字符的》相關(guān)的同類信息!
  • 本頁(yè)收集關(guān)于ASP代碼實(shí)現(xiàn)自動(dòng)清除替換ACCESS(MDB)數(shù)據(jù)庫(kù)的日文字符的的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章