设置工业管理学(工业工程)代理
终极管理员 知识笔记 124阅读
# 地区改变代理私有结构struct _ INTERNET _ PROXY _ infopubliccesstypesssasinteger publicproxybypassingptrendustringruntime .互操作服务/span>/span>/span>/span>('wininet). 'setlasterror :=True)_ private style=' color : rgba(0,0,255,1)' SharedFunctionInternetSetOption(byvalhinternatasintptr,ByValdwOptionAsInteger,ByVallpBufferAsIntPtr,byvallpdwbufferlenghasinteger)AsBooleanEndFunctionPublicSharedSubSetProxy(OptionalByValstrProxy)
rgba(0, 0, 255, 1)">As/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">String/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(128, 0, 0, 1)">"/span>/span>/span>span style="color: rgba(128, 0, 0, 1)">221.130.7.227:80/span>/span>/span>span style="color: rgba(128, 0, 0, 1)">"/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">)/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Const/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> INTERNET_OPTION_PROXY /span>/span>/span>span style="color: rgba(0, 0, 255, 1)">As/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Integer/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(128, 0, 128, 1)">38/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>/span>/span>br> /span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Const/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> INTERNET_OPEN_TYPE_PROXY /span>/span>/span>span style="color: rgba(0, 0, 255, 1)">As/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Integer/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(128, 0, 128, 1)">3/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>/span>/span>br/span>/span>/span>br> /span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Dim/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> struct/span>"/span>"/span>/span/span/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">As/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> Struct_INTERNET_PROXY_INFO
/span>/span>/span>br> /span>/span>/span>span style="color: rgba(0, 128, 0, 1)">'/span>/span>/span>span style="color: rgba(0, 128, 0, 1)"> Filling in structure /span>/span>/span>span style="color: rgba(0, 128, 0, 1)"/span>/span>/span>br/span>/span>/span>/span/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> struct/span>"/span>"/span>/span>.dwAccessType /span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> INTERNET_OPEN_TYPE_PROXY
struct/span>"/span>"/span>/span>.proxy /span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>/span>/span>(strProxy)
struct/span>"/span>"/span>/span>.proxyBypass /span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>/span>/span>(/span>/span>/span>span style="color: rgba(128, 0, 0, 1)">"/span>/span>/span>span style="color: rgba(128, 0, 0, 1)">local/span>/span>/span>span style="color: rgba(128, 0, 0, 1)">"/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">)
/span>/span>/span>br> /span>/span>/span>span style="color: rgba(0, 128, 0, 1)">'/span>/span>/span>span style="color: rgba(0, 128, 0, 1)"> Allocating memory /span>/span>/span>span style="color: rgba(0, 128, 0, 1)"/span>/span>/span>br/span>/span>/span>/span/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> /span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Dim/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> intptrStruct /span>/span>/span>span style="color: rgba(0, 0, 255, 1)">As/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"span class="xzm_is" data-txt="IntPtr#C2#A0#3C"/span>/span>/span/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>"/span>/span>(struct/span>"/span>"/span>/span>))
/span>/span>/span>br> /span>/span>/span>span style="color: rgba(0, 128, 0, 1)">'/span>/span>/span>span style="color: rgba(0, 128, 0, 1)"> Converting structure to /span>/span>/span/span>/span>/span>span style="color: rgba(0, 128, 0, 1)"/span>/span>/span>br/span>/span>/span>/span/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> Marshal.StructureToPtr(struct/span>"/span>"/span>/span>, intptrStruct, /span>/span>/span>span style="color: rgba(0, 0, 255, 1)">True/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">)
/span>/span>/span>br> /span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Dim/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> iReturn /span>/span>/span>span style="color: rgba(0, 0, 255, 1)">As/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">Boolean/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span/span>/span>/span>span style="color: rgba(0, 0, 0, 1)">=/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"> InternetSetOption(IntPtr.Zero, INTERNET_OPTION_PROXY, intptrStruct, /span>(struct/span>"/span>"/span>/span>))
/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">End Sub/span>/span>/span>span style="color: rgba(0, 0, 0, 1)"/span>/span>/span>br/span>/span>/span>/span/span>/span>/span>span style="color: rgba(0, 0, 255, 1)">#End Region/span>/span>/span>p/p>
/span>/span>/span>/div>

标签: