根据 oracle 标准计算超长字符串的长度
Oracle 数据库使用 sql语句 : select lengthb('输入字符串') from dual , 来计算 字符串 所占的字节长度(比如,一个汉字3个字节),但是用这个lengthb函数时,输入字符串的长度不能超过4000,这样遇到一些超长字符串就不行了,因此,需要用下面的三个vb.net函数来配合获取:
Private Function getStrLength_long(strInput As String) As Integer
'Try
Dim list_strs As List(Of String) = getList_shortStrs(strInput)
Dim totalLength As Int16 = 0
For Each _str In list_strs
totalLength += getStrLength_short(_str)
Next
Return totalLength
'Catch ex As Exception
' MessageBox.Show("当前输入的有特殊字符,不容许 " & ex.ToString)
' Return 0
'End Try
End Function
''' <summary>
''' 这个函数的功能,是将输入的一个长字符串转化为 由若干条较短的字符串组成的列表
''' 本函数是为了测算字符串的长度而做配套的,
''' oracle在测算字符串长度时,字符串长度不能超过4000个字节,否则会出错
''' 所以,将一条长字符串转化为若干条短字符串,对每条短字符串分别测算长度,再累加起来,即长字符串的长度
''' </summary>
''' <param name="strInput">输入的一个长字符串</param>
''' <returns></returns>
Private Function getList_shortStrs(strInput As String) As List(OfString)
Dim lengthValue As Int16 = 1000 ' 阈值, 短字符串的长度
' 之所以定为 1000 ,是因为即使这1000个字符全是汉字,1000 *3 = 3000,仍然小于 4000
Dim list_strs As List(Of String) = New List(Of String)
Dim totalLength As Int16 = strInput.Length ' 名义上的总长度
If totalLength < lengthValue Then ' 如果名义长度 小于 阈值
list_strs.Add(strInput)
Return list_strs ' 返回
End If
' 现在知道该字符串 的长度 超过阈值了,需要处理
Dim ii = 0
While (ii + 1) * lengthValue <= totalLength ' 对长字符串进行 分段
list_strs.Add(strInput.Substring(ii * lengthValue, lengthValue))
ii += 1
End While
' 最后一小段字符串
list_strs.Add(strInput.Substring(ii * lengthValue, strInput.Length - ii * lengthValue))
Return list_strs ' 返回
End Function
' 下面这个函数只能对较短的字符串(长度不超过4000)判断长度
Private Function getStrLength_short(strInput As String) As String
If strInput.Length = 0 Then
End If
' 下面,直接根据Oracle数据库的判读字符串长度的方法来判断
' lengthb(string)计算string所占的字节长度: select lengthb('¥') from dual
Dim strSql As String = "select lengthb('" & strInput & "') from dual"
Dim rs AsNew ADODB.Recordset
Dim da As New Data.OleDb.OleDbDataAdapter()
Dim cmd AsNew ADODB.Command
cmd.CommandText = strSql
cmd.ActiveConnection = conn
cmd.CommandType = CommandType.Text
'Try
rs = cmd.Execute() ' 执行
'Catch ex As Exception
' 'MessageBox.Show("当前输入的字符串有特殊字符,无法判断长度")
' Return "过长或特殊字符,无法判断长度"
'End Try
If Not rs.EOF Then
Return rs.Fields(0).Value.ToString
End If
Return ""
End Function
根据 oracle 标准计算超长字符串的长度的更多相关文章
- JS计算文本字符串字节长度和像素长度的方法
来源:js获取字符长度并计算px宽度 - [云]风过无痕 - 博客园 (cnblogs.com) <!DOCTYPE html> <html lang="en"& ...
- PHP 统计中文字符串的长度
中文网站一般会选择两种编码:gbk/gb2312或是utf-8. gbk编码下每个中文字符所占字节为2,例: $zhStr = ‘您好,中国!’; echo strlen($zhStr); // 输出 ...
- Oracle 超长字符串分割劈分
Oracle 超长字符串分割劈分,具体能有多长没测过,反正很大.... 下面,,,,直奔主题了: CREATE OR REPLACE FUNCTION splitstr(p_string IN clo ...
- 应用:计算字符串的长度(一个双字节字符长度计2,ASCII字符计1) String.prototype.len=function(){return this.replace(/[^\x00-\xff]/g,"aa").length;}
应用:计算字符串的长度(一个双字节字符长度计2,ASCII字符计1) String.prototype.len=function(){return this.replace(/[^\x00-\xff] ...
- PHP计算字符串的长度
<?php /** * 计算字符串的长度(汉字按照两个字符计算) * * @param string $str 字符串 * * @return int */ function str_len($ ...
- JS计算字符串的长度
最近项目上经常要用到计算字符串的长度的问题,有时需要按照byte进行计算长度,所以我就想在页面上用js实现,于是就到网上查了相关的资料,发现确实有很多的版本,这里给出两个比较好用的. //方法一:逐个 ...
- js混合计算字符串字节长度
js混合计算字符串字节长度 function getBt(str) { ) { var char = str.match(/[^\x00-\xff]/ig); : char.length); } el ...
- Java 按字节计算字符串的长度
在<从后向前截取指定长度的字符串>中介绍了如何截取字符串,本文介绍如何统计字符串的字节长度. import org.slf4j.Logger; import org.slf4j.Lo ...
- SqlSever基础 len函数 计算前后都有空格的字符串的长度时
镇场诗:---大梦谁觉,水月中建博客.百千磨难,才知世事无常.---今持佛语,技术无量愿学.愿尽所学,铸一良心博客.------------------------------------------ ...
随机推荐
- eclipse jvm 参数配置
双击tomcat服务器---->打开启动配置--->VM 自变量
- C#异步的世界【上】(转)
新进阶的程序员可能对async.await用得比较多,却对之前的异步了解甚少.本人就是此类,因此打算回顾学习下异步的进化史. 本文主要是回顾async异步模式之前的异步,下篇文章再来重点分析async ...
- 用 ubuntu 自带的 gome-screenshot 来实现类似QQ截图那样的功能,同时设置键盘快捷键
在window下习惯了使用ctrl+Alt+A截图,在linux还真有点不习惯,所以下面介绍一下替代的用法. 打开 ubuntu 的系统设置-->键盘-->快捷键:界面如下: 01 添加一 ...
- 【linux】CentOS 6 使用cron定时任务,报错:Redirecting to /bin/systemctl restart crond.service
在centos7上,执行cron定时任务的相关命令,反馈如下: 定时任务执行,反馈是: Redirecting to /bin/systemctl restart crond.service 原因: ...
- .Net Core中文编码问题
原文:https://www.cnblogs.com/ideacore/p/6964771.html 问题 .net core环境下,使用HttpClient执行GetStringAsync的时候,报 ...
- 在VS2019创建WebForm程序,开个箱
现在公司用的是VS2010+ASP.NET WebForm + DevExpress控件做系统开发,好老好老了,没办法,只能在这里尝一尝新鲜的味道. TMD,还以为马上创建,谁知还有一关!!! 还是那 ...
- Haskell路线
@ 知乎 @ <I wish i have learned haskell> ———— 包括: Ranks, forall, Monad/CPS, monadic parser, FFI ...
- 了解MySQL
目前流行的数据库 MySQL Oracle Microsoft SQLServer Microsoft Access PostgreSQL DB2/UDB InfoMax MySQL介绍 世界上最流行 ...
- CTF-代码审计(3)..实验吧——你真的会PHP吗
连接:http://ctf5.shiyanbar.com/web/PHP/index.php 根据题目应该就是代码审计得题,进去就是 日常工具扫一下,御剑和dirsearch.py 无果 抓包,发现返 ...
- 3 Linux文件基本属性
Linux系统是一种典型的多用户系统,不同的用户处于不同的地位,拥有不同的权限.为保护系统的安全性,Linux系统对不同的用访问的同意文件(包括目录文件)的权限做了不同的规定eg: [root@www ...