asp对表access表字段的操作

2014/11/8 1:52:071337 阅读

    删除字段
    dim cmd 
    set cmd=server.createobject ("adodb.command") 
    set cmd.activeconnection =conn 
    Sqlj="alter table product drop column "&zd&""
    cmd.commandtext =sqlj
    cmd.execute sqlj 
    


    增加字段
    dim cmd 
    set cmd=server.createobject ("adodb.command") 
    set cmd.activeconnection =conn 
    Sqlj="alter table 表名 add column 字段 varchar(20)"
    cmd.commandtext =sqlj
    cmd.execute sqlj 
    

    检测字段是否存在:
    sqlbb="select   *   from   表名"
    Set   RSbb=Conn.Execute(sqlbb)
    for   i   =   0   to   RSbb.Fields.Count   -   1
    if   RSbb.Fields(i).Name="字段"   then
    '处理方式
    Exit For
    end   if
    Next
    rsbb.close
    set rsbb=nothing
    

    下一条:PHPCMSv9专题静态路径修改

    上一条:vb asp截取ip前三段

枣庄西桥网络微信小程序微信小程序

枣庄西桥网络手机站二维码扫描手机浏览