Photoshop自定义水晶字特效样式
Photoshop CS2 custom menu自定义菜单功能
Photoshop CS2 custom menu自定义菜单功能
用Oracle9i在线表格重定义来重新组织表格
在Oracle9i中定义视图约束
ORACLE用户自定义备份与恢复笔记
自定义用于ASP Web站点的SQL 7.0数据库(1)
自定义用于ASP Web站点的SQL 7.0数据库(2)
代码很简单的，我这里的例子是从文本框里输入新的数据库路径，然后更新链接。你参考一下，再改。
Private Sub Command0_Click()
On Error GoTo Err_Command0_Click
Dim cat As ADOX.Catalog
Dim tdf As ADOX.Table
Me.txtDBnewNAME.SetFocus
Set cat = New ADOX.Catalog
Set cat.ActiveConnection = CurrentProject.Connection
Set tdf = cat.Tables("mytable")
tdf.Properties("jet oledb:link datasource") = Me.txtDBnewNAME.Text
Exit_Command0_Click:
Exit Sub
Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click
End Sub
| 网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！） |