文章·资料 电脑软件 手机应用 网站源码




    本 站 搜 索
   推 荐 文 章        More...
华硕易电脑(ASUS Eee PC 1025C..
先来段开场白:为了外出携带方便,到淘..
Acronis True Image 使用说明
  一款可以在Windows下使用全部功..
Norton Ghost 使用详解
一、分区备份   使用Ghost进行系..
    文 章 阅 读 排 行
手机视频监控 APP 关闭广告:萤..
一、萤石云视频:我的,设置,隐私设置,..
常见数据库介绍与对比(SQL Serv..
常见数据库的对比分析,涵盖你提到的 A..
Windows 系统修改默认文件类型..
Windows 系统文件类型图标,通常由默..
Windows 系统安装或备份时 ISO,..
【ISO 文件】 ISO 文件其实就是光..
Microsoft SQL Server 2000 Per..
  对于第一次安装 Microsoft SQL Se..
颜色与英文单词对照
颜色与英文单词对照 red green bl..
PakePlus 构建 APP 需要 Github..
PakePlus 是一个基于 Rust Tauri 的..
主页真的越Google、越简洁越好吗
  如果你在11月10日早上打开雅虎中..
网络工程师必懂的专业术语
路由器问题:1、什么时候使用多路由协..
为啥现在的电脑都不能安装 Wind..
说实话,这几年如果你尝试在新电脑..
 文 章 信 息
解决 Access 数据库中搜索日文的问题
评论()〗〖留言〗〖收藏
〖文章分类:电脑·手机·网络 / 网站设计·开发·优化〗〖阅读选项
Function fuckjp(value_)
’此函数为老康自我需要而做,并不代表中国人民共和国政府之观点
’本人并不知道Japan是什么鸟意思
’本函数可用于简单的防止Access数据库因为含有这26个该死的日文字符而造成不能查询操作
’当然,使用此函数前请确定你不太在乎录入数据库的数据少几个日文字符

Dim fuckjapan
fuckjapan = replace(value_,"ゴ","?")
fuckjapan = replace(fuckjapan,"ガ","?")
fuckjapan = replace(fuckjapan,"ギ","?")
fuckjapan = replace(fuckjapan,"グ","?")
fuckjapan = replace(fuckjapan,"ゲ","?")
fuckjapan = replace(fuckjapan,"ザ","?")
fuckjapan = replace(fuckjapan,"ジ","?")
fuckjapan = replace(fuckjapan,"ズ","?")
fuckjapan = replace(fuckjapan,"ヅ","?")
fuckjapan = replace(fuckjapan,"デ","?")
fuckjapan = replace(fuckjapan,"ド","?")
fuckjapan = replace(fuckjapan,"ポ","?")
fuckjapan = replace(fuckjapan,"ベ","?")
fuckjapan = replace(fuckjapan,"プ","?")
fuckjapan = replace(fuckjapan,"ビ","?")
fuckjapan = replace(fuckjapan,"パ","?")
fuckjapan = replace(fuckjapan,"ヴ","?")
fuckjapan = replace(fuckjapan,"ボ","?")
fuckjapan = replace(fuckjapan,"ペ","?")
fuckjapan = replace(fuckjapan,"ブ","?")
fuckjapan = replace(fuckjapan,"ピ","?")
fuckjapan = replace(fuckjapan,"バ","?")
fuckjapan = replace(fuckjapan,"ヂ","?")
fuckjapan = replace(fuckjapan,"ダ","?")
fuckjapan = replace(fuckjapan,"ゾ","?")
fuckjapan = replace(fuckjapan,"ゼ","?")
fuckjp = fuckjapan

End Function

文章作者:未知  更新日期:2006-09-18
〖文章浏览:〗〖发送文章〗〖打印文章