社区
数据库(包含打印,安装,报表)
帖子详情
求教字符串分解写入数据库!
lanmeimei126
2006-02-10 10:38:54
例如有字符串"123,145,4567,3456, ,43545"将其分解为"123"、"145"、"4567"、"3456"、""、"43545"逐一写入数据库一条记录的各个字段:日期,期限,姓名,年龄,身高和体重中,求代码。我知道用split函数,但是写入数据库这块儿就不会了。请高手指点
...全文
105
7
打赏
收藏
求教字符串分解写入数据库!
例如有字符串"123,145,4567,3456, ,43545"将其分解为"123"、"145"、"4567"、"3456"、""、"43545"逐一写入数据库一条记录的各个字段:日期,期限,姓名,年龄,身高和体重中,求代码。我知道用split函数,但是写入数据库这块儿就不会了。请高手指点
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
lanmeimei126
2006-02-13
打赏
举报
回复
谢谢,问题已解决
zyl910
2006-02-12
打赏
举报
回复
Split函数
描述
返回一个下标从零开始的一维数组,它包含指定数目的子字符串。
语法
Split(expression[, delimiter[, count[, compare]]])
Split函数语法有如下几部分:
部分 描述
expression 必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串(""),Split则返回一个空数组,即没有元素和数据的数组。
delimiter 可选的。用于标识子字符串边界的字符串字符。如果忽略,则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串,则返回的数组仅包含一个元素,即完整的 expression字符串。
count 可选的。要返回的子字符串数,–1表示返回所有的子字符串。
compare 可选的。数字值,表示判别子字符串时使用的比较方式。关于其值,请参阅“设置值”部分。
设置值
compare参数的设置值如下:
常数 值 描述
vbUseCompareOption –1 用Option Compare语句中的设置值执行比较。
vbBinaryCompare 0 执行二进制比较。
vbTextCompare 1 执行文字比较。
vbDatabaseCompare 2 仅用于Microsoft Access。基于您的数据库的信息执行比较。
YuCao
2006-02-11
打赏
举报
回复
split函数
faysky2
2006-02-10
打赏
举报
回复
如果有数值型字段,那么插入时直接写数值,不需要用单引号括起来
faysky2
2006-02-10
打赏
举报
回复
Dim str As String, strArr() As String, strSql As String
str = "123,145,4567,3456, ,43545"
strArr = Split(str, ",")
插入数据库的语句:日期,期限,姓名,年龄,身高和体重中
Access库:
strSql = "insert into 表名称 values(#" & strArr(0) & "#,'" & strArr(1) & "','" & strArr(2) & "','" & strArr(3) & "','" & strArr(4) & "','" & strArr(5) & "')"
sql库:
strSql = "insert into 表名称 values(" & strArr(0) & ",'" & strArr(1) & "','" & strArr(2) & "','" & strArr(3) & "','" & strArr(4) & "','" & strArr(5) & "')"
qybao
2006-02-10
打赏
举报
回复
hvae a try
Dim data() as String
Dim sql as string
Dim i as Integer
data = split(your_string)
sql = "Insert into your_table(日期,期限,姓名,年龄,身高,体重) valuse("
for i=0 to ubound(data)-1
sql = sql + "'" + data[i] + "','
next i
sql = sql + sql + "'" + data[i] + "')"
...
vansoft
2006-02-10
打赏
举报
回复
insert into 表名(字段1,字段2,……) values(?,?,……)
幾個字段就幾個問號,
然後把?的值傳進去就可以,
不用加什麽引號不引號的。
用ADO的Command對象來做。
技術支持:Van_flf@Hotmail.com
数据处理救星降世Power Query
0/ Excel数据处理新利器来了,准备好了吗? 1/ 比网红函数VLOOKUP还全面的功能。——查(查询) 2/ 取其精华,去其糟粕。...——聚(聚合) 9/ 我自己的难题自己造函数,不
求教
别人。——技法(自定义函数)
WEB开发文档2 总结
将byte[]转换成16进制
字符串
的高效方法或算法 System.Diagnostics.Process问题 求助!我刚装了NET Framework SDK 1.1,IIS也在前几天装了,请问我的.ASPX需放在什么地方运行? 一个关于操作系统是否安装有.NET框架的...
2021 Java面试真题集锦
目录 … 1 大厂面试的基本流程 17 字节跳动 17 阿里 17 腾讯 18 网易游戏 18 面试前需要准备: 18 ...展示你在
数据库
调优方面的经验 25 总结前文说辞 26 准备项目说辞时,更可以准备后继面试官的问
我在CSDN参与的3000个帖子
字符串
查找,替换如:{%=HotNews("12","22","1","","","0","","20"," ","0","0")%} 97: 右键单击日期挑选器控件,选属性,出现的属性页窗体没有general选项卡。而且窗体特别大? 98: 散分求VB6.0英文版...
ML学习分享系列3_计算广告小窥[下]要啥自行车!
本人能力有限,更缺乏实践经验,文章内容多为书籍和论文的读后感,若有不当或者错误之处,还望各位同学指出,我定悉心
求教
。在此,向编写《计算广告》的刘鹏和王超两位老师致谢,向各位paper作者致谢。
数据库(包含打印,安装,报表)
1,216
社区成员
55,954
社区内容
发帖
与我相关
我的任务
数据库(包含打印,安装,报表)
VB 数据库(包含打印,安装,报表)
复制链接
扫一扫
分享
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章