所以我在我的工作场所找到了这个旧的web应用程序(asp经典),并被要求修改它。我想要做的是,我想要显示这个特定文件夹中的所有文件。我没有使用链接对每个文件名进行硬编码,而是尝试如下所示: <%
var fs = new ActiveXObject("Scripting.FileSystemObject");
var fo = new ActiveXObject("Scripting.FileSystemObject");
var f = new ActiveXObject("Scripting.FileSystemObj
以下代码:
Set fso = Server.CreateObject("Scripting.FileSystemObject")
If Not fso.FolderExists(path) Then
fso.CreateFolder(path)
End If
正在产生以下错误:
Microsoft VBScript运行时错误“800a003a”文件已经存在
如果我删除该文件夹,以便ASP能够创建它本身,它将按预期的方式工作。只有当我手动(或使用DOS MKDIR)创建它时,FolderExists才返回false,而CreateFolder抛出了上
我正在处理一个Asp .net项目,并且我在aspx页面中有一个文本区,我正试图通过单击带有以下代码的按钮来将文本区的内容保存到服务器上的一个文件中:
var fso = new ActiveXObject("Scripting.FileSystemObject");
var a = fso.CreateTextFile("c:\\temp1\\testfile.txt", true);
a.WriteLine(saveData);
a.Close();
问题是如果文
我希望能够将excel文件从一个文件夹复制到另一个文件夹。但是,每次它复制它时,我都想将名称更改为TABLEAUPCQ1、TABLEAUPCQ2、TABLEAUPCQ3等等。
原因是,如果其他路径中已有人在使用excel文件,则无法覆盖该文件。
Sub CopierFichier()
Dim fso As Object
Set fso = VBA.CreateObject("Scripting.FileSystemObject")
Call fso.CopyFile("R:\ASP\PCQ_BEHESP\SuiviPCQAssignations\TABLEAUPCQ
这是我将文件上传到folder...but的代码,我需要将文件上传到可能还不存在的文件夹。如何在上传文件之前创建文件夹,或者在asp中是否有一个参数可以在文件不存在的情况下在复制文件之前创建文件夹?..我需要根据用户输入创建文件夹...
<%
Class FileUploader
Public Files
Private mcolFormElem
Private Sub Class_Initialize()
Set Files = Server.CreateObject("Scripting.Dictionary")
我有一个标签分隔文本文件,它使用一个经典ASP页面来读取它,并从上到下显示它。以下是文本文件:
Email Division Course TotalIncorrect Score DATE_TIME
1steve.perry@gov.gc.ca National BI Course 5 40% 2014-01-23 16:38:55
2sylvie.smith@gov.gc.ca B - H - J - L BI Course 5 100% 2014-0
我有一个服务器端包含head.asp的文件header.asp。在head.asp中,我的数据库连接是创建的,并且可以从header.asp文件和使用header.asp文件作为服务器端的页面(在本例中是我的core.asp文件)访问。在core.asp中,我有以下内容:
if request.querystring("page") = "" then
response.write("<p>No data to load</p>")
else
page = request.querystring("page
我想用服务器上某个特定目录中所有子目录的列表对DropDownList控件进行数据库化。我要搜索的目录位于应用程序的根目录中。我对编程相当陌生,我甚至不知道从哪里开始。
我在一个网站上找到了这个代码:
Dim root As String = "C;\"
Dim folders() As String = Directory.GetDirectories(root)
Dim sb As New StringBuilder(2048)
Dim f As String
For Each f In fold
我有一个典型的ASP页面,我需要为表上的每一行创建一个循环,然后创建一个html文档并将其保存到硬盘驱动器中,但是我想创建一个模板,所以我只需要将这两个变量发送到模板,这样我就不必每次在循环中编写HTML文档。
到目前为止,这就是我所拥有的:
SQL = "select Title, Article from [ASPTest].[dbo].[articles]"
set rs = conn.execute(SQL)
arrRecs = rs.GetRows
For row = 0 To UBound(arrRecs, 2) 'Rows
For
第一篇文章是关于Stackoverflow的,如果做错了什么,让我知道。
我正在处理一个VBA脚本,它返回一个文件夹中所有文件的列表,并且它是子文件夹。(以字符串的形式)
但是,它只返回主文件夹和第一个子文件夹的文件。这真的很奇怪,因为我可以清楚地看到它在所有文件夹中循环,但不知怎么的,它没有返回其他文件夹的“getfiles”变量。
Sub test()
MsgBox getfiles("L:\", True)
End Sub
功能:
Function getfiles(startFolder As String, doSubfolders As Boolean) A
我使用以下VBscript.i通过将变量(Strlist)写入文本文件来显示变量(Strlist)中的文本文件"list.txt“。
Const Value = &H23&
Const PATH = "\Cape\ibs"
Dim fso ' File System Object
Dim spFile ' Text File object to write
Dim objApplication ' Application object
Dim objFolder
如何获得正在运行的vbscript/经典ASP页面的路径?我使用了几个代码片段,但所有代码片段都提供了当前工作目录(C驱动器路径),但我需要获取脚本所在的当前文件路径。
我正在尝试在一个.VBS文件和一个.ASP文件中显示它。
Dim folderName1
folderName1 = ""
Dim fso1
Set fso1 = CreateObject("Scripting.FileSystemObject")
Dim fullpath
fullpath = fso1.GetAbsolutePathName(folderName1)
response.