A. WebBrowser控件做网页浏览器 如何做转到上一页 下一页
建一个COmmand1,Command2,Command3,Webbrowser1.当然，你要先单击Command1打开一个网页，然后点击其中的一个链接，这样才能后退，后退完了才能前进，否则会报错的。
代码如下。
＝＝＝＝＝＝＝＝＝
Private Sub Command1_Click()
WebBrowser1.Navigate ".com"
End Sub
Private Sub Command2_Click()
WebBrowser1.GoBack
End Sub
Private Sub Command3_Click()
WebBrowser1.GoForward
End Sub
B. VB WEB控件问题
重点回答第一个问题。
依楼主意思，只能采取读取缓存文件的方式。
共分二个步骤：
一、建立一个模块，复制下面代码：
Option Explicit
Private Const ERROR_CACHE_FIND_FAIL As Long = 0
Private Const ERROR_ACCESS_DENIED As Long = 5
Private Const ERROR_INSUFFICIENT_BUFFER As Long = 122
Private Const LMEM_FIXED As Long = &H0
Private Const NORMAL_CACHE_ENTRY As Long = &H1
Private Type FILETIME
dwLowDateTime As Long
dwHighDateTime As Long
End Type
Private Type INTERNET_CACHE_ENTRY_INFO
dwStructSize As Long
lpszSourceUrlName As Long
lpszLocalFileName As Long
CacheEntryType As Long
dwUseCount As Long
dwHitRate As Long
dwSizeLow As Long
dwSizeHigh As Long
LastModifiedTime As FILETIME
ExpireTime As FILETIME
LastAccessTime As FILETIME
LastSyncTime As FILETIME
lpHeaderInfo As Long
dwHeaderInfoSize As Long
lpszFileExtension As Long
dwExemptDelta As Long
End Type
Private Declare Function FindFirstUrlCacheEntry Lib "wininet" _
Alias "FindFirstUrlCacheEntryA" _
(ByVal lpszUrlSearchPattern As String, _
lpFirstCacheEntryInfo As Any, _
As Long) As Long
Private Declare Function FindNextUrlCacheEntry Lib "wininet" _
Alias "FindNextUrlCacheEntryA" _
(ByVal hEnumHandle As Long, _
lpNextCacheEntryInfo As Any, _
As Long) As Long
Private Declare Function FindCloseUrlCache Lib "wininet" _
(ByVal hEnumHandle As Long) As Long
Private Declare Sub CopyMemory Lib "kernel32" _
Alias "RtlMoveMemory" _
(pDest As Any, _
pSource As Any, _
ByVal dwLength As Long)
Private Declare Function lstrcpyA Lib "kernel32" _
(ByVal RetVal As String, ByVal Ptr As Long) As Long
Private Declare Function lstrlenA Lib "kernel32" _
(ByVal Ptr As Any) As Long
Private Declare Function LocalAlloc Lib "kernel32" _
(ByVal uFlags As Long, _
ByVal uBytes As Long) As Long
Private Declare Function LocalFree Lib "kernel32" _
(ByVal hmem As Long) As Long
Function SavePic(Url As String, FileName As String)
Dim icei As INTERNET_CACHE_ENTRY_INFO
Dim hFile As Long
Dim cachefile As String, LocaFile As String
Dim posUrl As Long
Dim posEnd As Long
Dim dwBuffer As Long
Dim pntrICE As Long
hFile = FindFirstUrlCacheEntry(0&, ByVal 0, dwBuffer)
If (hFile = ERROR_CACHE_FIND_FAIL) And _
(Err.LastDllError = ERROR_INSUFFICIENT_BUFFER) Then
pntrICE = LocalAlloc(LMEM_FIXED, dwBuffer)
If pntrICE <> 0 Then
CopyMemory ByVal pntrICE, dwBuffer, 4
hFile = FindFirstUrlCacheEntry(vbNullString, _
ByVal pntrICE, _
dwBuffer)
If hFile <> ERROR_CACHE_FIND_FAIL Then
Do
CopyMemory icei, ByVal pntrICE, Len(icei)
If (icei.CacheEntryType And _
NORMAL_CACHE_ENTRY) = NORMAL_CACHE_ENTRY Then
cachefile = GetStrFromPtrA(icei.lpszSourceUrlName)
If InStr(1, cachefile, Url, vbTextCompare) > 0 Then
LocaFile = GetStrFromPtrA(icei.lpszLocalFileName)
FileCopy LocaFile, FileName
MsgBox "文件保存完毕！"
Exit Function
End If
End If
Call LocalFree(pntrICE)
dwBuffer = 0
Call FindNextUrlCacheEntry(hFile, ByVal 0, dwBuffer)
pntrICE = LocalAlloc(LMEM_FIXED, dwBuffer)
CopyMemory ByVal pntrICE, dwBuffer, 4
Loop While FindNextUrlCacheEntry(hFile, ByVal pntrICE, dwBuffer)
End If
End If
End If
Call LocalFree(pntrICE)
Call FindCloseUrlCache(hFile)
End Function
Private Function GetStrFromPtrA(ByVal lpszA As Long) As String
GetStrFromPtrA = String$(lstrlenA(ByVal lpszA), 0)
Call lstrcpyA(ByVal GetStrFromPtrA, ByVal lpszA)
End Function
二、程序调用举例：
在窗体中，当用Webbrowser控件装入网页后，记住验证码网址，然后作如下调用：
SavePic URL, App.Path & "\1.bmp"
其中的URL即验证码网址，App.Path & "\1.bmp" 即保存的文件名
C. asp.net中为什么在设计窗体中双击按钮不能进入代码区拜托各位大神
<%@ Page Language="C#" AutoEventWireup="true" CodeFile="Default.aspx.cs" Inherits="_Default" %> 可能是CodeFile没指令对
满意请采纳
D. 用.Net的WebBrowser控件加载本地html网页时，为什么js没有加载进去
页面初始化时未加载function方法，将window.load = function（），再试试有没有解决问题
E. C#里WebBrowser控件的问题！高手帮帮忙吧！
两个办法：
1.数数按几个tab可以到那个按钮，然后，用sendkey函数，发几个tab, 然后，发一个空格，可以按下那个按钮。
2.分析一下对方的网页，用webclient对象直接把提交的数据post上去。那有这么麻烦，还用什么webbrowser!
-----------
另外，楼上正解！强大！不愧是MS专家！
收藏了！
只是还有个问题，如果那个按钮按下后，弹出个“are you sure”，该怎么办？
F. 用webbrowser控件开发的程序，点击界面按钮页面不跳转
1、 在comments.php评论表单中添加自己想要的字段，如：
<p>
<input type="text" name="tel" id="tel" size="22" tabindex="4" />
<label for="tel">电话</label>
</p>
tabindex 这个属性按照从小到大排，为什么要这样？你可以自己试试….
2、如果评论表单是使用系统自带的，那么请用以下方法添加表单字段，如果不是，请略过
add_filter('comment_form_default_fields','comment_form_add_ewai');
function comment_form_add_ewai($fields) {
$label1 = __( '国家/地区' );
$label2 = __( 'Skype账号' );
$label3 = __( '电话' );
$label4 = __( '传真' );
$label5 = __( '地址' );
$value1 = isset($_POST['guojia']) ? $_POST['guojia'] : false;
$value2 = isset($_POST['skype']) ? $_POST['skype'] : false;
$value3 = isset($_POST['tel']) ? $_POST['tel'] : false;
$value4 = isset($_POST['fax']) ? $_POST['fax'] : false;
$value5 = isset($_POST['address']) ? $_POST['address'] : false;
$fields['guojia'] =<<<HTML
<p>
<label for="guojia">{$label1}</label>
<input id="guojia" name="guojia" type="text" value="{$value1}" size="30" />
</p>
HTML;
return $fields;
}
3、 接收表单字段并写入数据库
在主题目录的 functions.php添加以下代码
add_action('wp_insert_comment','wp_insert_tel',10,2);
function wp_insert_tel($comment_ID,$commmentdata) {
$tel = isset($_POST['tel']) ? $_POST['tel'] : false;
//_tel 是存储在数据库里的字段名字，取出数据的就会用到
update_comment_meta($comment_ID,'_tel',$tel);
}
这两步就可以将数据写入数据库了，不信你试试看
add_action()参数中的10和2分别表示该函数执行的优先级是10（默认值，值越小优先级越高），该函数接受2个参数。
4、在后台显示额外字段
前面两步只是接收和写入到数据库，那么要怎么在后台评论列表中显示呢？将以下代码复制到主题目录的functions.php 中：
add_filter( 'manage_edit-comments_columns', 'my_comments_columns' );
add_action( 'manage_comments_custom_column', 'output_my_comments_columns', 10, 2 );
function my_comments_columns( $columns ){
$columns[ '_tel' ] = __( '电话' ); //电话是代表列的名字
return $columns;
}
function output_my_comments_columns( $column_name, $comment_id ){
switch( $column_name ) {
case "_tel" :
echo get_comment_meta( $comment_id, '_tel', true );
break;
}
如果要在前台的留言列表中调用，就用以下代码，_tel就是你在数据库中存储的字段名字
<?php
$tel = get_comment_meta($comment->comment_ID,'_tel',true);
if( !empty($tel)){
echo "电话".$tel;
}
?>
5、 大功告成，看看后台的评论列表，是不是多了一列电话，那样的话就没错了。
6、如果要移除某一个自带的表单字段，可以使用以下代码
function tel_filtered($fields){
if(isset($fields['tel']))
unset($fields['tel']);
return $fields;
}
add_filter('comment_form_default_fields', 'tel')
G. 我的web页面中有些flash控件打不开是什么问题啊.急急急急
下载flash播放插件
H. weboffice控件加载不上，怎么处理
在一些BS系统中，有时需要调用word来显示文本内容，这是一般情况下用到的就是weboffice，如果打开页面，显示红叉，或者文本不显示时，就需要加载weboffice控件。
工具/原料
ie
weboffice
方法/步骤
1
其实要加载wboffice很简单，设置ie浏览器即可，浏览器会自动加载控件。
首先打开ie浏览器。点击工具。
2
然后选择Internet 选项。
3
然后依次点击“安全”，“可信站点”，“站点”。如图
4
然后点击“添加”，将网站添加到可信站点了。再点击关闭。
5
接下来点击“自定义级别”。
6
找到activex控件和插件，将所属的全部点成启用。
7
然后点击关闭。
8
然后重启浏览器。就ok啦。
I. vb 用web控件浏览网页，在ie中点击后本来应该在新窗口中打开新的网页，在vb中点击无反应，怎么办（内详
额 什么意思