原vb6的代码 Private Declare Function InternetSet[3条回复]

当前位置：首页

开发技术指南» 文章正文

引言：

摘要：我想在asp里面把1,2,3,4,5,6,7,8,9输出为9,8,7,6,5,4,3,2,1 请问有没有个倒序排列的函数?? ......

摘要：我想做一个汇总表,第一列是序号,第二列是系统名称,第三列是设备名称,第四列是设备数量,... 其中第一列是动态排序,第二,三列是固定的数据,而第四列是根据设备名称从不同的库中得来的,例如:设备名称为a,设备数量则统计表a中的符合条件的记录数. 这样一个汇总表中用到好用数据表.不知道应该怎么做 ......

.net中的api应用问题应不难，但我不会，帮帮忙

原vb6的代码
Private Declare Function InternetSetOption Lib "wininet.dll" Alias "InternetSetOptionA" (ByVal hInternet As Long, ByVal dwOption As Long, ByRef lpBuffer As Any, ByVal dwBufferLength As Long) As Long
Private Declare Function InternetQueryOption Lib "wininet.dll" Alias "InternetQueryOptionA" (ByVal hInternet As Long, ByVal dwOption As Long, ByRef lpBuffer As Any, ByRef dwBufferLength As Long) As Long
........................
lngRetValue = InternetSetOption(0&, INTERNET_OPTION_PROXY, ProxyInfo, LenB(ProxyInfo))

我用自代的工具升级后，说不再支持Any,哎！我改成Object，
lngRetValue = InternetSetOption(0&, INTERNET_OPTION_PROXY, ProxyInfo, Len(ProxyInfo))
运行程序报错，哎！应如何做，这个是设置IP代理的程序,请帮忙看看,谢谢

NO.1 作者： saucer

see

http://www.cnblogs.com/jonnyyu/archive/2004/02/14/1247.aspx

NO.2 作者： malingxian

Private Declare Function InternetSetOption Lib "wininet.dll" Alias "InternetSetOptionA" (ByVal hInternet As int32, ByVal dwOption As int32, ByRef lpBuffer As object, ByVal dwBufferLength As int32) As int32
Private Declare Function InternetQueryOption Lib "wininet.dll" Alias "InternetQueryOptionA" (ByVal hInternet As int32, ByVal dwOption As int32, ByRef lpBuffer As object, ByRef dwBufferLength As int32) As int32
........................
lngRetValue = InternetSetOption(0&, INTERNET_OPTION_PROXY, ProxyInfo, LenB(ProxyInfo))

NO.3 作者： pupo

你把lpBuffer 声明成具体类型看看

·苏州明年将实施免费义务教育在全国尚是首例 »显示摘要«

摘要：苏州明年将实施免费义务教育在全国尚是首例 -------------------------------------------------------------------------------- http://news.tom.com 2005年09月08日01时56分　　来源:现代快报　　此举在全国尚是首例，具体方案将于近日正式公布　　省教育厅9月4日称，2006年起江苏......

» 本期热门文章：

· 热门栏目：

» 相关精选文章

» 其它相关：