高分求解:"如何在VB中用ADO实现将某字段设置为允许空字符串"!!!!! 如:现ACCESS数据库localdb中有一表test,其中MC字段的允许空字符串属性现为“否”,现要改为"是",问在代码中如何实现?(不要教我手工改噢!) 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 alter table test alter column mc varchar(10) null cn.open "....."cn.execute "alter table test alter column mc varchar(10) null" 用adox对象,Column 对象的Attributes属性设为AdColNullable alter table test alter column mc varchar(10) null 同意3楼的意见,建议使用adox对象。 cn.execute "alter table test alter column mc varchar(10) null"执行上述操作后,MC字段的"允许空字符串"属性已经改为"是" cn.execute "alter table test alter column mc varchar(10) null"执行上述操作后,MC字段的"允许空字符串"属性已经改为"是" 最新进展,大家共享,欢迎参与,一起进步. localcon1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "D:\commail" & "\localdb.mdb;" & "Mode=Share Deny Read|Share Deny Write;Persist Security Info=False;Jet OLEDB:Database Password=" & mdbtmp Dim cat As New ADOX.Catalog, tbl As New ADOX.Table, cnn As ADODB.Connection Set cat.ActiveConnection = localcon1 ''''执行以下语句时报错,提示信息为"编译错误:不能给只读属性赋值",这是为什么?why????? cat.Tables.Item(test).Columns(mc).Attributes(AllowZeroLength) = adColNullable localcon1.Close 我的MSN message帐号为[email protected],有志与我一起进步的朋友可以和我联系.我的email为:[email protected] http://access911.net/index.asp?board=4&mode=3&recordid=74FAB01E15DC 紧急求助!!!VB+Access+Excel问题...... 恳请大家帮忙!!! 关于MSHFlexgrid的问题 VB中多线程问题 怎样向COM传递数组? 如何把form中的内容,用word软件显示出来呢? 关于richtextbox控件 VB中有没有 复制字符串的函数 做一套系统,如何把各个功能模块化? 怎样把数据库中的内容写到Word文档中去?我想要源代码!!!!! 请教一个有关"将Label中的字发送到另一程序中的本文文档"的问题 关于在vb中调用mfc写的dll的问题 怎样修改库中表的名字而不丢失表中的内容(在线等,成功后马上给分)!!急急
cn.execute "alter table test alter column mc varchar(10) null"
执行上述操作后,MC字段的"允许空字符串"属性已经改为"是"
执行上述操作后,MC字段的"允许空字符串"属性已经改为"是"
localcon1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "D:\commail" & "\localdb.mdb;" & "Mode=Share Deny Read|Share Deny Write;Persist Security Info=False;Jet OLEDB:Database Password=" & mdbtmp Dim cat As New ADOX.Catalog, tbl As New ADOX.Table, cnn As ADODB.Connection Set cat.ActiveConnection = localcon1 ''''执行以下语句时报错,提示信息为"编译错误:不能给只读属性赋值",这是为什么?why?????
cat.Tables.Item(test).Columns(mc).Attributes(AllowZeroLength) = adColNullable localcon1.Close
我的email为:[email protected]