包含vb.netie缓存的词条

vb.net如何实现缓存处理？

首先~~需要确认的是，每次读取花时间的问题~是在连接上还是在创建实例上。

如果是在创建实例上，需要做【单例模式】，建议所有数据创建在Module中，并做全局变量。

Cache是一种B/S，的MVC方式。

缓存方式有很多~~~

一种是物理方式（做物理RAM内存开避空间）

一种是文件方式（做文件）

如文件方式，较常出现的如MVC的缓存，就是大概原理就是，把不经常用到（变化）的数据信息放到文件中，采用读取文件的方式（比访问数据快），存在指定或CurrentDir中。

如果想方便~需要追加一系列状态标识~当访问时，触发变更，然后在读取数据前，确认这个状态是否变动，如果变动说明数据库有变动，需要再次访问数据库。如果没有变动，则读取文件。

这种就叫缓存技术。

当然，我说的这种是比较简单的，还是需要设计思想。

相关问答

Q1: VB里面怎么删除IE的Cookie？

有一个方法，可以删除C:\documents settings\用户名\local settings\Temporary Internet Files下面的所有目录中的文件，就可以清除缓存和Cookie了

Q2: VB.net绘图具体如何设置双缓冲

VB.NET画图是不能设置双缓冲的，双缓冲是指窗体，从来没说是针对控件。

不用graphic.clear清理重画就不会闪烁。你可以先把容器删了再重新建立一个再去画。

简单举例：

Graphics g;

Pen p;

Panel pl;

构造函数初始化：

p=new Pen(Color.Red,2);

pl=panel1;

造成闪烁的画法：

g=pl.CreateGraphics();

g.Clear(SystemColor.ButtonFace);

//.....画新的

不会闪烁的办法：

this.Controls.ReMoveAt(panel1);

pl=new Panel();

pl.Name="panel1";

//....创建容器控件

this.Controls.Add(pl);

//继续画

Q3: 用VB怎么把IE的指定缓存文件转存到桌面，比如C:\Users\蓝冰\AppData\Local\Microsoft\Windows\Temporary

Private Sub Command1_Click() '删除源文件并复制到指定文件夹按钮事件

Dim a As String, b As String

a = "C:\Users\蓝冰\AppData\Local\Microsoft\Windows\Temporary\music.m4a" '源

b = "C:\Documents and Settings\Administrator\桌面\music.m4a" '复制到指定路径

If Dir(a) "" Then '判断有没有该文件存在

FileCopy a, b '从a文件夹里复制到b文件夹

Kill a '将a文件夹里的指定文件删除

Else

MsgBox "没有找到该文件！！"

End If

End Sub

Q4: VB 如何删除IE 缓存？

直接del /s /q+路径不就行了，最后加上一个MSGBOX（“清除完毕！”）就行了啊

是del /s /q。。。

这是调用外部命令

具体伱CMD进去然后输入del /?

Q5: vb.net如何重置IE浏览器设置？或vb.net如何设置IE浏览器忽略网页上指定的

VB.NET调用IE代码示例：

Dim p As New Process

'获得URL

aURL = GetURL()

'获得IE路径

p.StartInfo.FileName =

System.Environment.

GetFolderPath( _

Environment.SpecialFolder.

ProgramFiles).Trim() _

"\Internet Explorer\

IEXPLORE.EXE"

p.StartInfo.Arguments

= aDenURL

'启动IE

'p.Start(aDenURL)

p.Start()

'主程序开始等待IE结束

p.WaitForExit()

另一种VB.NET调用IE的方法

Imports System.Threading

Private Sub Button1_Click(ByVal

sender As System.Object, ByVal e

As System.EventArgs) Handles

Button1.Click

Dim webobj As Object

webobj = CreateObject("Internet

Explorer.Application")

With webobj

.visible = True

.Navigate2(";)

Do While (.busy Or .readyState 4)

Thread.Sleep(100)

Loop

.Document.f.q.Value = Me.TextBox1.Text

.Document.f.btng.Click()

End With

MsgBox("completed.")

End Sub