我以前是学ASP的,现在在看一个VB的程序,修改的时候要连接数据库,怎么连啊?怎么增加记录?怎么更新?与ASP的有什么不同?
解决方案 »
- 求助... 整点报时程序, 语言不限
- VB快捷键的问题?
- 什么控件能打开二进制的 xls 文件? Spreadsheet 能实现吗?
- VB怎么自动查找网页服务器IP与端口?
- 哪位大哥有自动在线更新的程式啊?高分相送,我要完整的写好的.
- [请教]如何快速地耗尽上网带宽
- 怎样实现toolBar上的按钮宽度按标题大小来显示,
- 一.请问如何才能在DataGrid控件中使用按钮!
- VB中窗体的Borderstyle设为0-NONE.在程序运行时,显示在任务栏只有程序名称,而没有了图标,请问怎样才能使图标不丢失??
- 我用VB写了个软件,请高手指点指点!
- 如何在没有安装水晶报表的机器上打印水晶报表?
- vb中调用EXCLE遇到的一个问题。(帮我找一个错)
Private Sub Command1_Click()
On Error GoTo err
Dim cn As New ADODB.Connection, rs As New ADODB.RecordSet
'cn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=登陆用户名;Password=登录密码;Initial Catalog=数据库名;Data Source=服务器别名/IP"
cn.CursorLocation=adUseClient'设置客户端游标
cn.Open
cn.Execute "Insert Into 某某表 Values(......)" '增加数据
cn.Execute "Update 某某表 Set ....." '更新数据
rs.Open "select * from 某某表", cn, 3, 2 '查询数据
Set DataGrid1.DataSource=rs '显示数据到DataGrid1
Exit Sub
err:
MsgBox err.Description
End Sub