查看單個文章
舊 2009-03-10, 08:16 PM   #6 (permalink)
飛行船大大
註冊會員
 
飛行船大大 的頭像
榮譽勳章
UID - 282126
在線等級: 級別:13 | 在線時長:238小時 | 升級還需:14小時級別:13 | 在線時長:238小時 | 升級還需:14小時級別:13 | 在線時長:238小時 | 升級還需:14小時
註冊日期: 2007-10-09
文章: 156
精華: 0
現金: 282 金幣
資產: 7282 金幣
預設

引用:
作者: cwvdavid 查看文章
http://tw.php.net/manual/en/function.fopen.php
這是php網站的函數說明..
cwvdavid大 真熱心 還幫我找了.php網站的函數說明.
多謝Chin-Wei 大的程式碼.
2位都是最佳解答,但是
我在用下一行指令測試時, 發現 我還缺少另一個簡易的 .php網頁
也就是要先 自動登錄. 否則執行 writeFile.php 時會發生沒有寫新檔的權限.
http://tomkiki1.host.sk/test/writeFi...tUsed=20090226

---------------
我找出以前曾設計過的類似案例
是用 vb6 來呼叫 某一簡單的自動登入 .asp
若登入成功會 傳回 "5,0,xxxx,xxx"一堆字串 , 若登入失敗會傳回字串 "6, php錯誤代號"
我的VB6源碼 :
語法:
      strRet = ""
      ReDim varRet(0)
      SrvTag = "ProFile_Get.asp"
      SrvTag = SrvTag & "?UID=" & objSys.UrlEncodeUTF8(UserID)
      SrvTag = SrvTag & "&Pwd=" & objSys.UrlEncodeUTF8(UserPwd)
      strRet = XmlHTTP(SrvTag)
      varRet = Split(strRet, "`")
      If varRet(0) = "5" And Err.Number = 0 Then
         gstr_myName1 = varRet(1)    '{我的姓氏}
         gstr_myName2 = varRet(2)    '{我的名字}
         gstr_myNickName = varRet(3) '{我的暱稱}
         gstr_myMobile = varRet(4)   '{我的手機}
      Else
         'MsgBox "目前無法連線網路,請檢查網路環境後點選【系統\重新連線】", vbCritical
      End If
這個登入的php對於 懂Php的老手而言是小菜一碟,現在問題是 Php 我從沒摸過php語法.對菜鳥就有些困難

例如
登入帳號是:abcde
密碼是:12345
我須要一個 login.php ,可以接受8個參數
呼叫時用: login.php abcde 12345 參數3 參數4 參數5 參數6 參數7 參數8
並傳出如上方所講的
若登入成功會 傳回 "5,0,xxxx,xxxx"一堆字串 , 若登入失敗會傳回字串 "6, php錯誤代號"

登入我的網站是在這裏 http://tomkiki1.host.sk/
我在想 那位php高手可以修改這一頁
http://www.host.sk/default_web.php
而這個login.php 畫面越單純越好,不必有任何的圖案, 只須留8個 位置可供接受參數 1.帳號 2.密碼 (第3~第8個 則是預留以後可能會用到 ), 和1個提交鈕.
並且 當login.php 被vb6 呼叫之時,螢幕也不必出現任何畫面.
需求就是這麼簡單.
謝謝各位 !

此帖於 2009-03-10 11:15 PM 被 飛行船大大 編輯.
飛行船大大 目前離線  
送花文章: 169, 收花文章: 55 篇, 收花: 132 次
回覆時引用此帖
有 2 位會員向 飛行船大大 送花:
kppne0931 (2009-05-20),magicwoo (2009-03-12)
感謝您發表一篇好文章