亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频

蟲(chóng)蟲(chóng)首頁(yè)| 資源下載| 資源專(zhuān)輯| 精品軟件
登錄| 注冊(cè)

CreateFile

  • 文本文件和二進(jìn)制文件的區(qū)別。用文本方式讀寫(xiě)文件和以二進(jìn)制方式讀寫(xiě)文件的注意事項(xiàng)。C++對(duì)文件讀寫(xiě)的支持

    文本文件和二進(jìn)制文件的區(qū)別。用文本方式讀寫(xiě)文件和以二進(jìn)制方式讀寫(xiě)文件的注意事項(xiàng)。C++對(duì)文件讀寫(xiě)的支持,ofstream和ifstream的用法。Win32 SDK對(duì)文件讀寫(xiě)的支持,CreateFile函數(shù)、WriteFile函數(shù)、ReadFile函數(shù)的使用;MFC對(duì)文件讀寫(xiě)的支持,CFile類(lèi)和CFileDialog的使用

    標(biāo)簽: 讀寫(xiě) 二進(jìn)制 方式 注意事項(xiàng)

    上傳時(shí)間: 2016-06-19

    上傳用戶(hù):集美慧

  • asp實(shí)現(xiàn)限制一個(gè)ip只能訪問(wèn)一次的方法

    asp實(shí)現(xiàn)限制一個(gè)ip只能訪問(wèn)一次的方法 <%  '/////////////////////////////////////////////////////  '// //  '//作用:一個(gè)IP地址只允許訪問(wèn)本頁(yè)一次 //  '//引用:<!-- #include file="Check_Ip.asp" --> //  '// //  '/////////////////////////////////////////////////////    'Response.Charset = 936 '設(shè)置輸出編碼為簡(jiǎn)體中文  'Response.Buffer = false '關(guān)閉緩沖區(qū)    Dim Fso,ts,IpList,Cfs    '設(shè)置Cookies函數(shù)  Function SetCookie()  Response.Cookies("IsBrow") = "Brow" Response.Cookies("IsBrow").Expires = Date+365  End Function    '記錄IP地址函數(shù)  Function WriteIp(FileName, IpAddress)  Set Fso = Server.CreateObject("Scripting.FileSystemObject")  Set ts = Fso.OpenTextFile(Server.MapPath(FileName),8,true)  ts.WriteLine IpAddress  ts.Close  Set ts = Nothing  Set Fso = Nothing  End Function    '讀取IP地址函數(shù)  Function ReadIpList(FileName)  Set Fso = Server.CreateObject("Scripting.FileSystemObject")  If Not Fso.FileExists(Server.MapPath(FileName)) Then  CreateFile("Iplist.txt")  Exit Function  End If    Set ts = Fso.OpenTextFile(Server.MapPath(FileName))  Iplist = ts.ReadAll  ts.Close  Set ts = Nothing  Set Fso = Nothing  ReadIpList = Iplist  End Function    '創(chuàng)建文件函數(shù)  Function CreateFile(FileName)  Set Fso = Server.CreateObject("Scripting.FileSystemObject")  Set Cfs = Fso.CreateTextFile(Server.MapPath(FileName))  Cfs.Close  Set Cfs = Nothing  Set Fso = Nothing  End Function    '關(guān)閉當(dāng)前IE窗口函數(shù)(注:IE6下通過(guò),其他瀏覽器未測(cè)試)  Function CloseWindow()  'Response.Write "<script>window.location='javascript:window.opener=null;window.close();'</script>"  Response.Redirect "http://www.baidu.com" End Function    Ip = Request.ServerVariables("REMOTE_ADDR") '獲取瀏覽者IP地址    Cookie = Request.Cookies("IsBrow") '獲取當(dāng)前Cookies  'Response.Write Cookie    If Request.ServerVariables("HTTP_X_FORWARDED_FOR") <> "" Then  Response.Write "本站不允許使用代理訪問(wèn)" Response.End()  Else  If Cookie = "Brow" Then  CloseWindow()  Else  If Instr(ReadIpList("Iplist.txt"),Ip) <>0  Then  CloseWindow()  Else  WriteIp "Iplist.txt" , Ip  End If  SetCookie()  End If  End If  %>

    標(biāo)簽: asp 訪問(wèn)

    上傳時(shí)間: 2016-07-14

    上傳用戶(hù):helei0915

主站蜘蛛池模板: 文登市| 容城县| 厦门市| 博客| 临澧县| 普定县| 高唐县| 巢湖市| 疏附县| 同德县| 繁昌县| 余干县| 绥棱县| 长汀县| 稻城县| 清新县| 齐齐哈尔市| 宜良县| 东丽区| 平顶山市| 和顺县| 东兰县| 嘉善县| 准格尔旗| 章丘市| 江津市| 桑日县| 桦川县| 东台市| 商洛市| 遵义市| 泽普县| 定西市| 洪洞县| 横峰县| 方城县| 河间市| 伊通| 长乐市| 安仁县| 青铜峡市|