1.有没有子菜单?
2.dim cn as New Adodb.connection
  cn.open "Driver={Microsoft Access Driver (*.mdb)};dbq=DataBaseName;pwd=YourPassword"
3.Winsock.RemoteHostIP
4.以前的帖子你查查看...一定有的select name from syscolumns where id = object_id('yourTableName');  '查表中字段

解决方案 »

  1.   

    1、
    Dim lngMenuHwnd As Long
    lngMenuHwnd = GetMenu(me.hWnd)Dim lngSubMenuHwnd As Long
    lngSubMenuHwnd = GetSubMenu(lngMenuHwnd, 0)
    2、
    可以用资源文件的方法写出一个空的mdb文件,再用createtable建立表。
    如果你要建立的数据库结构已知的话,就更好办了,直接建立一个已建立好表格,字段的,但是没有纪录的mdb文件,放在资源文件里。需要的时候,将他写出,再用ado的方法写入记录就可以了。
    3、不知道
    4、http://www.csdn.net/expert/topic/384/384759.shtm
      

  2.   

    3.如果你知道对方的机器名那就: ping 对方机器名
    4.select name from sysobjects where type = 'U';  得到所有的表名
      sp_help 'yourtable_name';  得到表的所有字段信息