vb域名解析

1、vb.net怎样设置ie浏览器的代理服务器地址

建议你使用注册表的API进行修改

封装两个NET函数给你

private string GetReg(string RegPath)  取得注册表项内容
        {
            string str="";
            RegistryKey hkml = Registry.LocalMachine; 
            RegistryKey software = hkml.OpenSubKey("SOFTWARE",true); 
            RegistryKey aimdir = software.OpenSubKey("krabs",true);
            
            if (aimdir != null)
            {

                if (aimdir.GetValue(RegPath) != null)
                    str = aimdir.GetValue(RegPath).ToString();
                if (str != null)
                    return str;
                return null;
            }
            return null;
        }
        private bool SetReg(string RegPath,string Data)  //设置注册表内容
        {
            RegistryKey reg = Registry.LocalMachine;
            RegistryKey software = reg.OpenSubKey("SOFTWARE", true);
            RegistryKey aimdir1 = software.CreateSubKey("krabs");
            if (aimdir1 == null)
                return false;
            aimdir1.SetValue(RegPath, Data);
            return true;
        }

2、VB 读取服务器上的TXT文件 怎么设置用户名和密码

很简单，“NETRESOURCE”这个类型没有定义，需要定义模组，不然没有办法定义：
Dim curRes As NETRESOURCE

3、用VB+SQL设计的软件 怎么设置服务器、客户端和网络啊？

需要在服务器上对外开放SQL的访问端口，一般是UDP 1433,1434，另外，客户端的电脑要能够ping通服务器的IP地址，就可以正常访问了。

4、vb win7 text1读取本地连接dns text2dns修改dns域名解析 command1为确定

Const T_NEWDNS1 = "192.168.1.223" 'DNS1
Const T_NEWDNS2 = "180.76.76.76" 'DNS2
strWinMgmt = "winmgmts:{impersonationLevel=impersonate}"
Set NICS = GetObject(strWinMgmt).InstancesOf("Win32_NetworkAdapterConfiguration")

For Each NIC In NICS
If NIC.IPEnabled Then
NIC.SetDNSServerSearchOrder Array(T_NEWDNS1, T_NEWDNS2)
End If
Next

Frame1.Caption = "DNS修改完成"

5、谁用VB做服务器与利控通信，VB中设置了窗体名称和LinkMode=1和Linktopic 还是不行,高手指教

LinkItem、LinkMode、LinkTopic 属性示例
在这个例子中，每一次敲击鼠标都会使 Microsoft Excel 工作单中的单元更新 Visual Basic 的 TextBox 控件的内容。要试用此例，必须启动 Microsoft Excel，打开一个新的名叫 Sheet1 的工作单，在第一列中放入一些数据。在 Visual Basic 中，创建一个有 TextBox 控件的窗体。把代码粘贴到声明部分，然后按 F5 键运行该程序。

Private Sub Form_Click ()
Dim CurRow As String
Static Row ' 工作单的行数.
Row = Row + 1 ' 增加行.
If Row = 1 Then ' 只第一次.
' 确保连接不是活动的.
Text1.LinkMode = 0
' 设置应用程序的名字和题目名.
Text1.LinkTopic = "Excel|Sheet1"
Text1.LinkItem = "R1C1" ' 设置 LinkItem.
Text1.LinkMode = 1 ' 设置 LinkMode 为自动.
Else
' 在数据项目中更新行.
CurRow = "R" & Row & "C1"
Text1.LinkItem = CurRow ' 设置 LinkItem.
End If
End Sub

6、VB 怎样设置本地连接为自动获取ip,自动获取主备用服务器

没有研究过，有个嗖主意：手动更改本地连接的设置，观查注册表的变化。

7、如何在vb6.0中获取花生壳动态解析出的域名呢？

作为上位机，你是server，你不需要知道自己的IP，你只要listen 工作端口就是啦。下端的内DTU会自动连接容上来的。

（要查自己的域名对应的ip，要调用系统函数，
1. 调用系统DNS查询函数，解析出域名对应的IP
2. 你可以PING你的域名，回应中就有相应的ip）

8、请问：在VB6.0中使用winsock控件,作为服务器要设置本地IP地址吗?

服务端可以这样来：
With Listen
.Close
.LocalPort = Text1.Text ' (根据Text1中的数值来自定监听端口 ( 假如为：4567 ) )
.Listen
End With
客户端可以这样：
Winsock1.Close
Winsock1.Connect Text1.Text, Text2.Text '(Text1为要连接的服务器IP地址（服务端在本地可以为 127.0.0.1）， Text2为服务端监听的端口 ( 4567 ) )