
1、首先打开Excel数据表,在开发工具中打开VBA编辑器。
2、在单元格区域当中输入一些内容。
3、在VBA编辑器中插入模块。
4、Sub获取文件路径()Dim filess, tempfiless=ApplicationGetOpenFilename(, , "打开文件")If filess=False Then MsgBox "你未选择文件,程序即将退出!": Exit Subtemp=Split(filess, "\")。
5、MsgBox "你选择的《" & temp(UBound(temp)) & "》的路径为:" & Chr(10) & filess _
& Chr(10) & "当前表路径为:" & Chr(10) & ThisWorkbookFullName, vbokonty+64,"返回路径"End Sub。在模块当中输入代码,然后运行。
6、然后单击“执行”按钮,程序d出“选择文件”对话框。选择一个文件后,程序立即d出所选文件的路径,然后d出当前工作簿的路径。
这个文件夹 不一定会生成到最终发布目录,这个要看里面的文件是什么性质,是不是内容文件并复制到输出目录。
1 SystemDiagnosticsProcessGetCurrentProcess()MainModuleFileName
获取模块的完整路径。
2 SystemEnvironmentCurrentDirectory
获取和设置当前目录(该进程从中启动的目录)的完全限定目录。
3 SystemIODirectoryGetCurrentDirectory()
获取应用程序的当前工作目录。这个不一定是程序从中启动的目录啊,有可能程序放在C:\>
string []upfiles = RequestFilesAllKeys;
string filenames = "";
foreach (string s in upfiles)
{
if (s == "txt")
{
}
else if (s == "txt1")
{
}
filenames += s+"<br/>";
}
ResponseWrite(filenames);
注意:你的是 NET 后台获取。
估计你是获取不到的。因为你的上传的都是 html,而不是aspnet 控件。
你可以使用NET fileuploader 控件。
<%@ Page Language="C#" AutoEventWireup="true" CodeFile="Defaultaspxcs" Inherits="_Default" %><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 10 Transitional//EN" "
<html xmlns="
<head runat="server">
<title>无标题页</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<input id="File1" type="file" name="txt" /><br />
<input id="File2" type="file" name="txt"/><br />
<input id="File3" type="file" name="txt1"/><br />
<input id="File4" type="file" name="txt1"/><br />
<br />
<asp:FileUpload ID="FileUpload1" runat="server" />
</div>
<asp:Button ID="Button2" runat="server" onclick="Button2_Click" Text="Button" />
</form>
</body>
</html>
根据
foreach (string s in upfiles){
if (s == "txt")
{
}
else if (s == "txt1")
{
}
filenames += s+"";
}
来得到你想要的 上传文件。。
public File getFile(){
final JFileChooser fc = new JFileChooser();
fc setFileSelectionMode(JFileChooser FILES_AND_DIRECTORIES);
// JFileChooser FILES_ONLY
// JFileChooser DIRECTORIES_ONLY
int returnVal = fc showOpenDialog(this);
File file_choosed = fc getSelectedFile();
return file_choosed;
lishixinzhi/Article/program/Java/hx/201311/27130
string str =Process GetCurrentProcess() MainModule FileName;//可获得当前执行的exe的文件名
string str =Environment CurrentDirectory;//获取和设置当前目录(即该进程从中启动的目录)的完全限定路径
//备注 按照定义 如果该进程在本地或网络驱动器的根目录中启动 则此属性的值为驱动器名称后跟一个尾部反斜杠(如 C:\ ) 如果该进程在子目录中启动 则此属性的值为不带尾部反斜杠的驱动器和子目录路径(如 C:\mySubDirectory )
string str =Directory GetCurrentDirectory();//获取应用程序的当前工作目录
string str =AppDomain CurrentDomain BaseDirectory;//获取基目录 它由程序集冲突解决程序用来探测程序集
string str =Application StartupPath;//获取启动了应用程序的可执行文件的路径 不包括可执行文件的名称
string str =Application ExecutablePath;//获取启动了应用程序的可执行文件的路径 包括可执行文件的名称
string str =AppDomain CurrentDomain SetupInformation ApplicationBase;//获取或设置包含该应用程序的目录的名称
System Diagnostics Process GetCurrentProcess() MainModule FileName获取模块的完整路径
System Environment CurrentDirectory获取和设置当前目录(该进程从中启动的目录)的完全限定目录
System IO Directory GetCurrentDirectory()获取应用程序的当前工作目录 这个不一定是程序从中启动的目录啊 有可能程序放在C:\里 这个函数有可能返回C:\Documents and Settings\ZYB\ 或者C:\Program Files\Adobe\ 有时不一定返回什么东东 我也搞不懂了
System AppDomain CurrentDomain BaseDirectory获取程序的基目录
System AppDomain CurrentDomain SetupInformation ApplicationBase获取和设置包括该应用程序的目录的名称
lishixinzhi/Article/program/net/201311/12285
IE与FF获取上传文件路径方法
1 function getPath(obj)
2 {
3 if(obj)
4 {
5
6 if (windownavigatoruserAgentindexOf("MSIE")>=1)
7 {
8 objselect();
9
10 return documentselectioncreateRange()text;
11 }
12
13 else if(windownavigatoruserAgentindexOf("Firefox")>=1)
14 {
15 if(objfiles)
16 {
17
18 return objfilesitem(0)getAsDataURL();
19 }
20 return objvalue;
21 }
22 return objvalue;
23 }
24 }
在ie6中对于<input type="file" />通过objvalue是可以获取客户端选择文件的全路径的,但是到ie7就只能获取文件名,这对于onchange事件立即显示会有问题,可以用js方法解决
具体代码如下:
<html>
<head>
<title>get file input full path</title>
<script language='javascript'>
function getFullPath(obj)
{
if(obj)
{
//ie
if (windownavigatoruserAgentindexOf("MSIE")>=1)
{
objselect();
return documentselectioncreateRange()text;
}
//firefox
else if(windownavigatoruserAgentindexOf("Firefox")>=1)
{
if(objfiles)
{
return objfilesitem(0)getAsDataURL();
}
return objvalue;
}
return objvalue;
}
}
</script>
</head>
<body>
<input type="file" onchange="documentgetElementById('img')src=getFullPath(this);" />
<img id="img" />
</body>
</html>
以上就是关于VBA如何获取当前EXCEL文件的路径全部的内容,包括:VBA如何获取当前EXCEL文件的路径、C# 获取文件夹的绝对路径、.net 后台获取file的路径,还要按name区分开!怎么解决!等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)