vc 6.0应用程序和网页之间通信

Question

我想做一个应用程序，利用vc6.0
然后做一个网站，只能放到web空间，不能放到服务器！（web空间不能放应用程序，因此不能使用socket进行网络通信）
在web空间附带有数据库
我现在想在应用程序中调用web空间中数据库的数据
除了利用webservice这种办法，
还有就是在vc6.0中得到显示数据的网页，然后进行网页解析。我在这里想问问高手有没有其他的更好的办法进行桌面应用程序和网站之间的信息交互？

Answer 1

如果 web空间不能放应用程序，除了下载网页，可能没有别的办法
如果 web空间可以放程序，那就可以用任何支持的方式与服务器进行通信，web server的http协议本身可以由用户自定义，同时几乎所有像样点的web server都支持扩展编程，因此其应用的实现从理论上没有障碍，比如IIS下，通过ISAPI编程，在共享的进程地址空间下，可以开启新的 socket 服务进程,实现有状态的真正的长连接

Answer 2

自己的程序中使用 CHtmlView 或直接嵌入 Webbrowser 控件显示网页时，常常需要获取网页元素的一些事件，以实现对网页显示的控制或与网页元素进行交互。最常见的莫过于获取用户对网页上超链接的所有点击事件。要实现这个需求，在 MSDN 中描述了接收网页元素事件的基本方法，但这篇文章的一些细节语焉不详，让人摸不着头脑。在 CodeProject 这篇文章中提出了一种替代的方法，但是存在一些小的限制。本文详细演示了如何实现在 CHtmlView 中监视链接点击的方法。为了实现监视所有的链接点击而不是特定的超链接，第一步需要在 CHtmlView 的 IHTMLDocument 上安装全局的 EventHandler 以接收 DISPID_HTMLELEMENTEVENTS2_ONCLICK（或 DISPID_HTMLDOCUMENTEVENTS2_ONCLICK）鼠标点击事件；接下来在事件处理代码中判断是否是在超链接上发生。在处理事件响应函数的安装和卸载时要格外小心，重复安装可能导致重复接收到消息甚至程序崩溃，而忘记卸载则会导致 COM 资源泄漏。接收网页事件
要响应网页事件，需要实现 IDispatch 接口，并在其 Invoke() 方法中处理接收到的消息。对于 MFC，因为 CCmdTarget 类已经实现了 IDispatch 接口，因此继承 CCmdTarget 并结合相关宏可以较简单的处理消息。代码如下：// DocEvtHandler.h
// SDocEvtHandler 消息处理类声明 by 旧日重来#pragma once
#import <mshtml.tlb>class SDocEvtHandler : public CCmdTarget
{
  DECLARE_DYNAMIC(SDocEvtHandler)
public:
  SDocEvtHandler();
  virtual ~SDocEvtHandler();  // 消息处理函数
  void OnClick(MSHTML::IHTMLEventObjPtr pEvtObj);  DECLARE_MESSAGE_MAP()
  DECLARE_DISPATCH_MAP()
  DECLARE_INTERFACE_MAP()
};
// DocEvtHandler.cpp
// SDocEvtHandler 消息处理类实现 by 旧日重来#include "stdafx.h"
#include "DocEvtHandler.h"
#include "mshtmdid.h"IMPLEMENT_DYNAMIC(SDocEvtHandler, CCmdTarget)SDocEvtHandler::SDocEvtHandler()
{
  EnableAutomation();  // 重要：激活 IDispatch
}SDocEvtHandler::~SDocEvtHandler()
{
}BEGIN_MESSAGE_MAP(SDocEvtHandler, CCmdTarget)
END_MESSAGE_MAP()BEGIN_DISPATCH_MAP(SDocEvtHandler, CCmdTarget)
  DISP_FUNCTION_ID(SDocEvtHandler,"HTMLELEMENTEVENTS2_ONCLICK",
  DISPID_HTMLELEMENTEVENTS2_ONCLICK, OnClick,
  VT_EMPTY, VTS_DISPATCH)
END_DISPATCH_MAP()BEGIN_INTERFACE_MAP(SDocEvtHandler, CCmdTarget)
  INTERFACE_PART(SDocEvtHandler,
  DIID_HTMLButtonElementEvents2, Dispatch)
END_INTERFACE_MAP()void SDocEvtHandler::OnClick(MSHTML::IHTMLEventObjPtr pEvtObj)
{
  // 鼠标点击处理代码...详见下节
}
接下来，在 DocumentComplete 事件中安装事件处理响应函数：// 事件响应函数的管理 by 旧日重来
///////////////////// .h //////////////////////
class SWebpageView : public CHtmlView
{
  // 其他代码...
  SDocEvtHandler *m_pEventHandler;
  DWORD m_dwDocCookie;    // 用于卸载事件响应函数
  IDispatch *m_pDispDoc;  // 用于卸载事件响应函数
};//////////////////// .cpp ////////////////////
SWebpageView::SWebpageView()
: m_dwDocCookie(0)
, m_pDispDoc(NULL)
{
  m_pEventHandler = new SDocEvtHandler;
}// 安装响应函数。省略了一些失败判断以突出主要步骤
void SWebpageView::InstallEventHandler()
{
  if(m_dwDocCookie)   // 已安装，卸载先。最后一次安装的才有效
    UninstallEventHandler();  m_pDispDoc = GetHtmlDocument();
  IConnectionPointContainerPtr pCPC = m_pDispDoc;
  IConnectionPointPtr pCP;
  // 找到安装点
  pCPC->FindConnectionPoint(DIID_HTMLDocumentEvents2, &pCP);
  IUnknown* pUnk = m_pEventHandler->GetInterface(&IID_IUnknown);
  //安装
  HRESULT hr = pCP->Advise(pUnk, &m_dwDocCookie);
  if(!SUCCEEDED(hr))  // 安装失败
    m_dwDocCookie = 0;
}// 卸载响应函数。省略了一些失败判断以突出主要步骤
void SWebpageView::UninstallEventHandler()
{
  if(0 == m_dwDocCookie) return;  IConnectionPointContainerPtr pCPC = m_pDispDoc;
  IConnectionPointPtr pCP;
  pCPC->FindConnectionPoint(DIID_HTMLDocumentEvents2, &pCP);
  hr = pCP->Unadvise(m_dwDocCookie);
}// 在 DocumentComplete 事件中安装响应函数
void SWebpageView::OnDocumentComplete(LPCTSTR lpszURL)
{
  // 其他代码...
  InstallEventHandler();
}// 在 BeforeNavigate2 和 Destroy 事件中卸载响应函数
void SWebpageView::OnBeforeNavigate2(/* ... */)
{
  UninstallEventHandler();
  // 其他代码...
}
void SWebpageView::OnDestroy()
{
  UninstallEventHandler();
  CHtmlView::OnDestroy();
}
在正确安装了事件响应函数之后，就可以接收网页事件了。检测超链接点击事件
全局事件处理接口成功安装后，当 Webbrowser 控件中有相应的事件发生，则会自动调用事件响应函数。在上面的情况下，会接收到网页中所有的鼠标点击事件，因此我们需要判断用户是否是点击超链接对象。因为超链接内部可能还包含有子结构，例如图像，因此鼠标点击事件不一定直接发生在超链接对象，因此需要根据事件发生的对象逐级向上检查，代码如下：void SDocEvtHandler::OnClick(MSHTML::IHTMLEventObjPtr pEvtObj)
{
  MSHTML::IHTMLElementPtr pElement =
    pEvtObj->GetsrcElement(); // 事件发生的对象元素
  while(pElement) // 逐层向上检查
  {
    _bstr_t strTagname;
    pElement->get_tagName(&strTagname.GetBSTR());
    if(_bstr_t("a") == strTagname || _bstr_t("A") == strTagname)
    {
      // 已找到 "a" 标签，在这里写相应代码
      // 例1：取得目标地址：
      _variant_t vHref = pElement->getAttribute("href", 0);
      // 例2：取消点击，禁止转到目标页面
      pEvtObj->put_returnValue(_variant_t(VARIANT_FALSE, VT_BOOL));
      break;
    }
    pElement = pElement->GetparentElement();
  }
}