高手来帮我写网页啊!!!

发帖时间：2008-05-18 12:18:49

功能：[回复] [收藏] [使用卡片] [违规举报] 【复制地址】 [点50/回8]

分页：第一页 [1-50] 下一页尾页 [新开阅读] [只看楼主] [刷新本帖]

[楼主] [每日必看] [大字小字]
把网页传到服务器上去
然后我随时可以通过访问网页修改和网页同目录下的ip.txt文件

可以显示本机ip 打开页面需要密码

写好发下面谢谢poper

要密码打开十分重要!
修改于：5/18/2008 12:20:08 PM

点我试试，注意左边列表哦：
高手网页

---6974 | 回复戴尔笔记本惊喜价仅￥6199！咨询：800-858-2685

[1楼]：

等高手

2008-05-18 12:18:59

---巨馋嘴的子维小虾 | 回复

[2楼]：

不会吖`

2008-05-18 12:19:10

---不蛋【多多】

| 回复

[3楼]：

获得本机IP，利用日志处理类似的手段就行了；
密码……楼主一点儿基础都没有就玩这个？

2008-05-18 12:55:39

---劈柴喂马满嘴八卦 | 回复

[4楼]回3楼：

咋勒?

2008-05-18 12:56:40

---6974【楼主】 | 回复

[5楼]回4楼：

纳闷而已。
定义写入函数：
Private Function writeFile(strFileName)
Dim oFSO,oTextStream,strContent
创建FSO对象
Set oFSO = CreateObject("脚本ing.FileSystemObject")
创建一个文本文件
Set oTextStream = oFSO.CreateTextFile(strFileName)
设置要写入的内容
strContent = 获取机器IP的函数
oTextStream.Write strContent
oTextStream.Close
然后在某个按钮或者事件里直接调用该函数；
至于密码，如果你不用数据库的话，则写死好了，判断如果密码不等于“”，则重定向到一个error的网页就OK了。

2008-05-18 13:13:30

---劈柴喂马满嘴八卦 | 回复

[6楼]回5楼：

帮我写好谢谢帅锅

2008-05-18 13:22:26

---6974【楼主】 | 回复

[7楼]回6楼：

基本思路就这样了，上网自己看一下。
这才叫学习嘛。别人收的果子好吃，但终究不是自己的。

2008-05-18 13:28:14

---劈柴喂马满嘴八卦 | 回复

[8楼]回7楼：

晕倒~ 帮个忙嘛~

2008-05-18 13:28:47

---6974【楼主】 | 回复

分页：第一页 [1-50] 下一页尾页 [新开阅读] [只看楼主] [刷新本帖]

【复制本帖地址】http://pop.pcpop.com/t080518/4136281.html