|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
MySQL已经为支持所有最流行的Web2.0语言做好了准备,诸如Ruby、Ajax等,当然还有PHP。有的业界分析师说过,“每一个Web2.0公司实质上就是一个数据库公司。利用Access数据库天生申报数据与读进数据的实例办法:
示例:
[img=1style=,1src=]http://www.ckuyun.com/[/img]以下为援用的内容:
SubMwrite()
OnErrorGoTothiserr
DimrsAsNewADODB.Recordset
rs.Open"dlmd",CurrentProject.Connection,adOpenDynamic,adLockOptimistic,acTable
rs.Save"a:dlmd.adtg",adPersistADTG
rs.Close
Setrs=Nothing
thisexit:
ExitSub
thiserr:
MsgBoxErr.Description
Resumethisexit
EndSub
SubMread()
OnErrorGoToMerr
DimiAsInteger
DimrsDeAsNewADODB.Recordset
DimrsSoAsNewADODB.Recordset
rsSo.Open"a:dlmd.adtg","provider=mspersist"
rsDe.Open"dlmd",CurrentProject.Connection,adOpenKeyset,adLockOptimistic,acTable
DoUntilrsSo.EOF
rsDe.AddNew
Fori=0TorsSo.Fields.Count-1
rsDe.Fields(i)=rsSo.Fields(rsDe.Fields(i).Name)
Nexti
rsDe.Update
rsSo.MoveNext
Loop
rsSo.Close
rsDe.Close
SetrsSo=Nothing
SetrsDe=Nothing
Mexit:
ExitSub
Merr:
MsgBoxErr.Description
ResumeMexit
EndSub
下面我将描述五个不使用MySQL的响亮理由。 |
|