主题：如何修改MDB文件的结构

 cmd.ConnectionName = "test"

错误代码cmd.C，
c不是SQLcommand的成员

 

Connections.Add("test", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & ProjectPath & "data\信息数据库.mdb;Persist Security Info=False;Jet OLEDB:Database Password=123456")
Dim cmd As new SQLCommand
cmd.ConnectionName = "test"
cmd.CommandText = "alter table {教职工信息表} add 检测 varchar(10);"
cmd.ExecuteNonQuery
cmd.CommandText = "update {教职工信息表} set 检测=jc;"
cmd.ExecuteNonQuery
cmd.CommandText = "alter Table {教职工信息表} drop Column jc;"
cmd.ExecuteNonQuery
cmd.CommandText = "alter table {教职工信息表} add 级别 varchar(10);"
cmd.ExecuteNonQuery
cmd.CommandText = "update {教职工信息表} set 级别=jb;"
cmd.ExecuteNonQuery
cmd.CommandText = "alter Table {教职工信息表} drop Column jb;"
cmd.ExecuteNonQuery
Connections.Delete("test")

错误代码是cmd.C

C不是SQLcommand的成员

神了，有用了 ，太谢谢了，谢谢版主

如果把刚才的代码写到登录的窗体中，第一次登录的时候修改了，第二次登录的时候还会执行修改的代码的，怎么写个判断jc jb两个列名称的条件语句呢？这里想语法很陌生，请版主帮我改一下吧！

方法一：

 

Connections.Add("test", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & ProjectPath & "data\信息数据库.mdb;Persist Security Info=False;Jet OLEDB:Database Password=123456")
Dim cmd As new SQLCommand
cmd.C
cmd.CommandText = "select * from {教职工信息表} where 1=2"
Dim dt As DataTable = cmd.ExecuteReader
If dt.DataCols.Contains("jc") Then
    cmd.CommandText = "alter table {教职工信息表} add 检测 varchar(10);"
    cmd.ExecuteNonQuery
    cmd.CommandText = "update {教职工信息表} set 检测=jc;"
    cmd.ExecuteNonQuery
    cmd.CommandText = "alter Table {教职工信息表} drop Column jc;"
    cmd.ExecuteNonQuery
    cmd.CommandText = "alter table {教职工信息表} add 级别 varchar(10);"
    cmd.ExecuteNonQuery
    cmd.CommandText = "update {教职工信息表} set 级别=jb;"
    cmd.ExecuteNonQuery
    cmd.CommandText = "alter Table {教职工信息表} drop Column jb;"
    cmd.ExecuteNonQuery
End If
Connections.Delete("test")

方法二：执行过一次以后，就把信息记录在项目里，第二次的时候，取出信息，判断是否执行过一次了

 

http://www.foxtable.com/help/topics/1544.htm

 

十分感谢甜版主！给您添麻烦了