導航:首頁 > 源碼編譯 > 40ps傳奇發布站源碼

40ps傳奇發布站源碼

發布時間:2022-03-08 01:25:32

㈠ 我想做個傳奇發布站

你做啊..准備點錢就OK了

㈡ 傳奇發布網站的採集代碼應該怎麼寫

<%end if
if request.QueryString("action")="caiji" then
dim Trs,sql,i,Texts
Function GetHttpPage(HttpUrl)
If IsNull(HttpUrl)=True Or HttpUrl="$False$" Then
GetHttpPage="$False$"
Exit Function
End If
Dim Http
Set Http=server.createobject("MSXML2.XMLHTTP")
Http.open "GET",HttpUrl,False
Http.Send()
If Http.Readystate<>4 then
Set Http=Nothing
GetHttpPage="$False$"
Exit function
End if
GetHTTPPage=bytesToBSTR(Http.responseBody,"GB2312")
Set Http=Nothing
If Err.number<>0 then
Err.Clear
End If
End Function

Function BytesToBstr(Body,Cset)
Dim Objstream
Set Objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function

Texts=GetHttpPage("http://www.www.com/cj.asp")
dim T1,T2,t3 : t3=0
if instr(Texts,"<body>")>0 then
Texts=mid(Texts,instr(Texts,"<body>"))
Texts=mid(Texts,1,instrrev("</body>"))
end if
t1=split(texts,"<br>")
t3=ubound(t1)
for i=0 to ubound(t1)-1
t2=split(t1(i),"{}")
if ubound(t2)=23 then
'寫入資料庫
sql="select * from Gq_sfdata where ip='" & t2(2) & "'"
Set Trs = Server.CreateObject("ADODB.recordset")
trs.CacheSize=20
trs.open sql,conn,1,3
if trs.eof then
trs.addnew
for i1=1 to 21 : if not isnull(t2(i1)) then trs(i1)=t2(i1) :end if : next
trs(22)=3
trs("hits")=0
trs.update
response.Write t2(1) & " <font color=red >" & t2(5) &"</font> 添加成功<br>"
else
response.Write t2(1) & " <font color=red >" & t2(5) &"</font> 已存在<br>"
end if
'trs.close
end if
next
Erase t1
Erase t2
set trs=nothing
conn.close
set conn=nothing
response.Write "共採集了" & t3 & "條信息"
end if
%>

㈢ 怎麼可以找到傳奇發布網站的站長

找發布站的代理,站長們都是很小心 很神密的人物,你找不到的,只能通過代理找
謝謝

㈣ 求個傳奇論壇網站程序源代碼、有的麻煩發個,謝謝謝謝謝謝哈!

論壇源碼很多,但是傳奇論壇的源碼,沒有。論壇要靠自己苦心經營才行的!
推薦論壇使用:discuz

㈤ 怎麼做傳奇發布網站,求高手指點

把登錄包壓縮下上傳到網站目錄上,然後在首頁上添加這個壓縮包的地址,別人就可以下載你的登陸器壓縮包了。 壓縮出來 安裝啊 點.EXE後綴的文件打開安裝

㈥ 那有傳奇私服免費發布站

這些免費發布站一般你要在一些傳奇QQ群或者網路的一些小廣告可以得知道,但說實話 這些個發布站做廣告沒有意義,而且所謂的免費是你要在自己的傳奇網站上作上他這個發布站的連接才算(免費)。一句話 沒意義 很麻煩!

㈦ 傳奇私服發布站的採集插件是什麼東西

採集插件就是採集其他網站上面的數據到自己的資料庫
採集分為手動採集和自動採集
手動採集就是需要採集的時候就人工採集
自動採集先進一點,它可以全天自動採集
每隔半個小時自動採集一次
我們是做發布站程序的
搜「概念發布站程序」 40ps

㈧ 好的傳奇發布網站有給幾個

沒有最好的只有更好的,κ㎜⒍㏄非常棒

㈨ 傳奇私服發布站|仙劍傳奇私服|新開仙劍傳奇|仙劍傳奇官網|仙劍版傳奇|新版仙劍,盛大老客戶端在那裡下載

去網路搜一下:搜服810f
打開第一個網站,網站的最下面就有傳奇老客戶端下載了。。

㈩ 傳奇發布站怎麼做

s需要響應的程度 總體來說比較麻煩 20分遠遠不夠的。 如果你找到好的站 可能有免費的程序!

閱讀全文

與40ps傳奇發布站源碼相關的資料

熱點內容
tsp演算法是數據挖掘演算法嗎 瀏覽:670
編譯原理好處 瀏覽:820
怎麼買伺服器主機 瀏覽:176
什麼app可以存檔游戲 瀏覽:430
那裡有螺桿壓縮機修理 瀏覽:31
什麼電腦軟體檢測安卓機 瀏覽:728
c語言編譯沒問題組件有錯誤 瀏覽:513
迅捷pdf編輯器破解版下載 瀏覽:14
電火花線切割怎麼編程 瀏覽:776
linux查看驅動命令 瀏覽:996
蘇州車輛解壓代辦大概多少錢 瀏覽:591
租房app什麼比較靠譜 瀏覽:676
運動app如何測量運動心率 瀏覽:782
蘋果手機文件夾圖標背景圖透明度 瀏覽:734
遼寧省解壓旅遊 瀏覽:271
pdf怎麼把部分圖紙拷到文件夾 瀏覽:697
讓程序員崩潰的40個瞬間 瀏覽:546
macbookair修改文件夾名稱 瀏覽:433
iphone如何快速刪除所有app 瀏覽:239
java高級編程pdf 瀏覽:886