我在一个免费的PHP支持服务器上有这个脚本:
<html>
<body>
<?php
$file = fopen("lidn.txt","a");
fclose($file);
?>
</body>
</html>
它创建文件lidn.txt,但它是空的.
如何创建文件并在其中写入内容,例如"Cats chase mice"行？
假设我有这个变量:
word ="习惯"
VBA中的哪个命令将允许我计算此变量中有多少个字符(在我的例子中它是5).
重要提示:变量"word"只包含一个单词,没有空格,但可能包含数字和连字符.
我觉得我缺乏一些真正的基础知识,如果在这里提出所有这些基本问题,我觉得我会浪费你的时间.能否请您推荐一本很好的PowerPoint VBA教程,向我解释基础知识.提供了一个带有例子的教程.
在Google App Engines中,我获得了此代码,可帮助通过其URL获取任何网页的HTML代码:
from google.appengine.api import urlfetch
url = "http://www.google.com/"
result = urlfetch.fetch(url)
if result.status_code == 200:
doSomethingWithResult(result.content)
我不明白这里有一件事(事实上还有很多其他事情)为什么在这段代码中建议从google.appengine.api导入urlfecth？Python没有自己的命令吗？
此代码将从文本文件中读取一行:
set file = CreateObject("Scripting.FileSystemObject").OpenTextFile("c:\number.txt", 1)
text = file.ReadLine
MsgBox text
如何从同一个文件中一行接一行地重复读取？我猜,我应该在这里使用一个循环,对吧？我需要它在第一次迭代时从文件中读取第一行,在第二次迭代时读取第二行,在第三次迭代时读取第三行,依此类推直到所有行都被读取.我该怎么做？
重要的补充:我需要代码逐一操作每一行 - 而不是一次完成!
我希望你们都过得愉快.
我想编写一个Web服务,每20分钟检查一些网页HTML代码并通过电子邮件发送到我的邮箱.在这里,我有人建议使用Google App Engine完成此任务.通过简要阅读该网站,我了解到可以在那里使用两种语言:Java和Python.
您认为哪一个最适合我的任务,因此,我必须开始学习？(我不知道哪种语言).
这是一些将A添加到B的数学代码:
Sub math()
A = 23
B = 2
ABSumTotal = A + B
strMsg = "The answer is " & "$" & ABSumTotal & "."
MsgBox strMsg
End Sub
但是如何计算ABSumTotal的平方根？是否可以在PowerPoint VBA中使用？
我试图创建这个脚本,创建10个空幻灯片,但由于某些原因它不起作用:
Sub CreatingSlides()
Dim oPresentation As Presentation
Set oPresentation = ActivePresentation
Dim oSlide As Slide
Dim oSlides As SlideRange
Dim oShape As Shape
Dim slideNumber As Integer
Dim myindex As Integer
Set myindex = 1
ActivePresentation.Slides.add(Index:=myindex, Layout:=ppLayoutBlank).Select
For myindex = 1 To 10
myindex = myindex + 1
ActivePresentation.Slides.add(Index:=myindex, Layout:=ppLayoutBlank).Select
Next myindex
End Sub
我在这做错了什么？也许我的循环在这里缺少一些东西？
在这段代码中,第四行是什么？
from google.appengine.api import urlfetch
url = "http://www.google.com/"
result = urlfetch.fetch(url)
if result.status_code == 200:
doSomethingWithResult(result.content)
我收到了一位来自这里的好朋友的代码,他们愿意花时间和精力与新手分享他们的知识:
Sub ReadLinesFromAFileOneAfterAnother ()
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, MyFile, FileName, TextLine
Set fso = CreateObject("Scripting.FileSystemObject")
FileName = "c:\testfile.txt"
Set MyFile = fso.OpenTextFile(FileName, ForReading)
'' Read from the file
Do While MyFile.AtEndOfStream <> True
TextLine = MyFile.ReadLine
'' Do stuff to TextLine
Loop
MyFile.Close
End Sub
虽然我知道这段代码执行了什么任务,但我仍然想知道它的每个元素的含义和作用.任何人都可以向我解释一下这段代码的第三行是什么:
Dim fso, MyFile, FileName, TextLine
什么是"fso"首先？我知道它代表"文件系统对象",但它没有什么可以向我解释它实际是什么以及它实现了什么.这三个词后面的意思是什么("MyFile","FileName","TextLine")？它们是某种参数吗？
我读过这个:http: //msdn.microsoft.com/en-us/library/h7se9d4f(VS.85).aspx
这个:http://msdn.microsoft.com/en-us/library/ebkhfaaz(VS.85).aspx
但感觉就像那些自己能够写出来的人那些材料一样 - 我几乎什么都不懂.当然,有些事情或多或少都很清楚,但还有很多其他的术语和文字我都不知道!最终,没有一个完整而清晰的画面.
所以,我放弃了,决定回到这里.这个网站可能是互联网上为数不多的(实际上我还没有遇到任何其他网站)在其规则中声明的网站之一:"毫无疑问太琐碎或太"新手"".这给了我一个问这个问题的理由.
所以,请任何人,用简单的语言向我解释"fso"是什么.确切地说,上面代码的第三行是关于什么的.
谢谢大家.
vba ×4
powerpoint ×3
python ×3
character ×1
command ×1
command-line ×1
count ×1
createobject ×1
file ×1
file-io ×1
fso ×1
html ×1
http ×1
import ×1
java ×1
math ×1
newline ×1
php ×1
scripting ×1
square-root ×1
urlfetch ×1
variables ×1
web-services ×1