具体做法:
新建数据工程,此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件和引用。
然后在FORM1窗体中添加ADODC控件和DATAGRID控件,将DATAGRID1的属性DATASOURCE选ADODC1,打开ADODC1控件属性页使用连接字符串,选生成,在提供者选项中选MICROSOFT jet 4.0 OLE DB Provider,然后按要求连接数据库等。在ADODC1控件属性页使用连接字符串空白文本窗口中就有一长串字符串,注意该字符串可复制到程序代码用于编程。ADODC1控件属性页的数据源内有命令文本(SQL)编写窗口可编写SQL查询语言。该窗口的SQL语句可复制到程序代码用于编程。
SQL查询语言主要结构为:
Select 查询字段 from 表名 Where 查询条件语句 [排序语句或分组语句]
查询字段必须分别用(西文)逗号分开或就用一个*号代替,上述查询中排序语句建议最好应用。
SQL查询语言如有错程序运行时告诉你出错,作相应改动即可。
一般先按上述连接,SQL用"SELECT * FROM TabelName"作调试,无问题,用一个按钮控件将前述需复制的连接字符串和SQL查询语言先复制于按钮控件的CLICK事件中备着,以便放着以后使用。然后删去ADODC1控件,再添加ADODC1控件再添其他内容。
SQL查询语言多写多用就会熟练,以上供提问者参考。
BHO(浏览器辅助对象)用于IE的加载项中,可以对IE的事件进行拦截编程(可以是IE上的工具条,或者按钮或者不可见插件).BHO的定义位于注册表"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Browser Helper Objects\" 下,当IE启动时就加载了该项下所有子项.通过IObjectWithSite接口同前面的工具条扩展一样可以用来获得浏览器的接口,而IDispatch接口,则被用来监听浏览器的事件。 首先需要获得IObjectWithSite接口的定义,你下载个tl_ole.zip,包含了接口定义,下载下来以后,把它应用 然后创建一个ActiveX DLL工程,名称为MyBho 在工程中引用这个tlb文件, 并且引用Microsoft HTML Object Library(MSHTML.DLL)和mcrosoft Internet Controls(Shdocvw.dll)。 Implements IObjectWithSiteTLB.IObjectWithSiteDim WithEvents m_ie As InternetExplorer '浏览器对象 Attribute m_ie.VB_VarHelpID = -1 Dim m_Site As IUnknownVB 'COM 接口 Private Sub IObjectWithSite_GetSite(ByVal priid As IObjectWithSiteTLB.GUIDPtr, ppvObj As IObjectWithSiteTLB.VOIDPtr) m_Site.QueryInterface priid, ppvObj End Sub Private Sub IObjectWithSite_SetSite(ByVal pSite As IObjectWithSiteTLB.IUnknownVB) Set m_Site = pSite Set m_ie = pSite '获取到对象以后可以做自己想做的一切 End Sub 将这个工程编译为:MyBho.dll。 编译工程后,可以通过调用regsvr32 MyBho.dll注册这个组件,这个地方如果这个组件在系统目录下的话就不用带路径,否则的话要带路径,如e:\\MyBho.dll 组件注册了以后,就会在注册表HKEY_CLASSES_ROOT\CLSID中注册组件的GUID。 在注册表中用prjBHO.dll做关键字就可以查找到MyBho.dll注册的GUID,然后将这个GUID拷贝下来,然后在注册表HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Browser Helper Objects下创建一个新项,项的名称就是这个GUID Private Sub m_ie_DocumentComplete(ByVal pDisp As Object, URL As Variant) On Error Resume Next MsgBox CSTR(URL) End Sub记得采纳啊
我的需求就是先填写好表和表中字段的名称,然后点击一个按钮,就在指定的路径生成一个ACCESS数据库。而不是事先手动创建。 请知道的各位附上完整代码,本人刚接触VB.NET,有些东西还不是很了解。谢谢。欢迎分享,转载请注明来源:内存溢出
评论列表(0条)