vbscript 转换excel文件到csv文件格式问题？# Programming - 葵花宝典
t*i
1 楼
本人现在是OPT有工作（F1的5年签证），女朋友是拿旅游签证，我们俩一起过美国海关
会不会有什么问题？还是比较容易（对她）？海关官员会不会怀疑有移民倾向，比如到
美国结婚？有没有什么需要注意的？谢谢！
会不会有什么问题？还是比较容易（对她）？海关官员会不会怀疑有移民倾向，比如到
美国结婚？有没有什么需要注意的？谢谢！
l*e
2 楼
USCIS网站显示：
On May 8, 2012, we mailed you a notice that we have approved this I612
APPLICATION TO WAIVE FOREIGN RESIDENCE REQUIREMENTS.
可是我到今天还没有收到，正常吗？
谢谢！！
On May 8, 2012, we mailed you a notice that we have approved this I612
APPLICATION TO WAIVE FOREIGN RESIDENCE REQUIREMENTS.
可是我到今天还没有收到，正常吗？
谢谢！！
r*n
3 楼
给父岳母办理 来美B1/B2签证 现在有如下问题 请各位大侠赐教：
1.我们绿卡5年，收入微薄但稳定。
2.岳父母5年前老婆生孩子的时候来过美国，延期半年，一共住了10个月。没去什么地
方玩。
3.岳父母经济收入稳定，月收入大约5000左右。有两大一小房子。
4.老婆有一姐姐，同住一城市。
问题是：
1延期会不会是个大问题？
2签证官会不会以这个原因刁难他们，应该如何应对
实在是很着急，岳父母年纪大了，很想来美国看看外孙。各位帮帮忙。
先谢了
1.我们绿卡5年，收入微薄但稳定。
2.岳父母5年前老婆生孩子的时候来过美国，延期半年，一共住了10个月。没去什么地
方玩。
3.岳父母经济收入稳定，月收入大约5000左右。有两大一小房子。
4.老婆有一姐姐，同住一城市。
问题是：
1延期会不会是个大问题？
2签证官会不会以这个原因刁难他们，应该如何应对
实在是很着急，岳父母年纪大了，很想来美国看看外孙。各位帮帮忙。
先谢了
m*3
4 楼
M与未婚妻F相会结婚，但两人一河相隔，M必须要借船过河才能见到F，于是他开始四处
找船。
这时见一个女子L刚好有船，M跟L借，L遇到M后爱上了他，就问：我爱上你了，你
爱我吗？M比较诚实，说：对不起，我有未婚妻，我不能爱你。这么一来，L死活是不把
船借给M，她的理由是：我爱你，你不爱我，这不公平，我不会借你的！
M很沮丧，继续找船，刚好见一位叫S的女子，就向她借船，S说：我借给你没问题，但
有个条件，我很喜欢你，你是不是喜欢我无所谓，但你必须留下陪我一晚，不然我不借
你。M很为难，L不借他船，S如果再不借他的话就过不去河与F相见了，据说这个地方只
有这两条船。为了彼岸的未婚妻，他不得不同意了S的要求，与S有了一夜情。次日，S
遵守承诺把船借给了M。
见到未婚妻F后，M一直心里有事，考虑了很久，终于决定把向L和S借船的故事跟F
说了。可惜，F听了非常伤心，一气之下与M分了手，她觉得M不忠，不能原谅。F失恋了
，很受打击.
这时他的生活里出现了位女子E，两人也开始恋爱了，但之前的故事一直让他耿耿
于坏，E问M是不是有什么话要跟她说，于是，M一五一十地把他和L、S、F
找船。
这时见一个女子L刚好有船，M跟L借，L遇到M后爱上了他，就问：我爱上你了，你
爱我吗？M比较诚实，说：对不起，我有未婚妻，我不能爱你。这么一来，L死活是不把
船借给M，她的理由是：我爱你，你不爱我，这不公平，我不会借你的！
M很沮丧，继续找船，刚好见一位叫S的女子，就向她借船，S说：我借给你没问题，但
有个条件，我很喜欢你，你是不是喜欢我无所谓，但你必须留下陪我一晚，不然我不借
你。M很为难，L不借他船，S如果再不借他的话就过不去河与F相见了，据说这个地方只
有这两条船。为了彼岸的未婚妻，他不得不同意了S的要求，与S有了一夜情。次日，S
遵守承诺把船借给了M。
见到未婚妻F后，M一直心里有事，考虑了很久，终于决定把向L和S借船的故事跟F
说了。可惜，F听了非常伤心，一气之下与M分了手，她觉得M不忠，不能原谅。F失恋了
，很受打击.
这时他的生活里出现了位女子E，两人也开始恋爱了，但之前的故事一直让他耿耿
于坏，E问M是不是有什么话要跟她说，于是，M一五一十地把他和L、S、F
x*y
5 楼
code 见下。excel file 值是 235693.328673913， 用了format,显示为235,693
。转成csv后为"235,693"，请问，如何在csv中存为没有格式的数字？
--------------------------------------------
Dim strExcelFileName
Dim strCSVFileName
Rem strExcelFileName = WScript.Arguments.Item(0) 'file name to parses
strExcelFileName = "test.xlsx"
Rem get path where script is running
Set fso = CreateObject ("Scripting.FileSystemObject") 'use this to find
current path
strScript = Wscript.ScriptFullName
strScriptPath = fso.GetAbsolutePathName(strScript & "..")
WScript.Echo "Reading Data from " & strExcelFileName
Rem If the Input file is NOT qualified with a path, default the current path
LPosition = InStrRev(strExcelFileName, "")
if LPosition = 0 Then 'no folder path
strExcelFileName = strScriptPath & "" & strExcelFileName
strScriptPath = strScriptPath & ""
else 'there is a folder path, use it for the output folder
path also
strScriptPath = Mid(strExcelFileName, 1, LPosition)
End If
Rem msgbox LPosition & " - " & strExcelFileName & " - " & strScriptPath '
use this for debugging
Set objXL = CreateObject("Excel.Application")
Set objWorkBook = objXL.Workbooks.Open(strExcelFileName)
objXL.DisplayAlerts = False
objWorkBook.Sheets(1).SaveAs strScriptPath & "test.csv", 6 'CSV
Rem clean up
objWorkBook.Close
objXL.quit
Set objXL = Nothing
Set objWorkBook = Nothing
Set fso = Nothing
。转成csv后为"235,693"，请问，如何在csv中存为没有格式的数字？
--------------------------------------------
Dim strExcelFileName
Dim strCSVFileName
Rem strExcelFileName = WScript.Arguments.Item(0) 'file name to parses
strExcelFileName = "test.xlsx"
Rem get path where script is running
Set fso = CreateObject ("Scripting.FileSystemObject") 'use this to find
current path
strScript = Wscript.ScriptFullName
strScriptPath = fso.GetAbsolutePathName(strScript & "..")
WScript.Echo "Reading Data from " & strExcelFileName
Rem If the Input file is NOT qualified with a path, default the current path
LPosition = InStrRev(strExcelFileName, "")
if LPosition = 0 Then 'no folder path
strExcelFileName = strScriptPath & "" & strExcelFileName
strScriptPath = strScriptPath & ""
else 'there is a folder path, use it for the output folder
path also
strScriptPath = Mid(strExcelFileName, 1, LPosition)
End If
Rem msgbox LPosition & " - " & strExcelFileName & " - " & strScriptPath '
use this for debugging
Set objXL = CreateObject("Excel.Application")
Set objWorkBook = objXL.Workbooks.Open(strExcelFileName)
objXL.DisplayAlerts = False
objWorkBook.Sheets(1).SaveAs strScriptPath & "test.csv", 6 'CSV
Rem clean up
objWorkBook.Close
objXL.quit
Set objXL = Nothing
Set objWorkBook = Nothing
Set fso = Nothing
z*f
6 楼
你们俩过海关时一人排一队不就完了。
【在 t**********i 的大作中提到】
: 本人现在是OPT有工作（F1的5年签证），女朋友是拿旅游签证，我们俩一起过美国海关
: 会不会有什么问题？还是比较容易（对她）？海关官员会不会怀疑有移民倾向，比如到
: 美国结婚？有没有什么需要注意的？谢谢！
【在 t**********i 的大作中提到】
: 本人现在是OPT有工作（F1的5年签证），女朋友是拿旅游签证，我们俩一起过美国海关
: 会不会有什么问题？还是比较容易（对她）？海关官员会不会怀疑有移民倾向，比如到
: 美国结婚？有没有什么需要注意的？谢谢！
F*x
7 楼
才一周时间，马上就会收到了
【在 l*****e 的大作中提到】
: USCIS网站显示：
: On May 8, 2012, we mailed you a notice that we have approved this I612
: APPLICATION TO WAIVE FOREIGN RESIDENCE REQUIREMENTS.
: 可是我到今天还没有收到，正常吗？
: 谢谢！！
【在 l*****e 的大作中提到】
: USCIS网站显示：
: On May 8, 2012, we mailed you a notice that we have approved this I612
: APPLICATION TO WAIVE FOREIGN RESIDENCE REQUIREMENTS.
: 可是我到今天还没有收到，正常吗？
: 谢谢！！
m*3
8 楼
M——金钱（Money）L——爱情（Love） S——性（Sex） F——家庭（Family） E——
事业（Enterprise） 答案其实很简单,就是用你的潜意识告诉你最想要的是什么
。不知道自己要什么，这是很普遍的问题，因为什么都挺重要的，舍弃什么都不成体统
，只是每个人的人生追求确实差异很大，看别人追求事业，你也羡慕也很想这样，但不
知道为什么总做不到；看别人婚姻幸福，你也很想，可实现起来确实不容易，这和运气
也不是太有关系，而是你需要的决定了很多。 我知道，一定有人看了这个答案
觉得很失望，就这个呀，这能说明什么呀？别看答案简单，其实这里面既包含这你的价
值观，也是对你人生有预示的。 我说两个故事吧。这故事中的两个人是很典型
的，都是测过这个游戏的。一个是我以前乐队成员，贝斯手，当时他写下的是：M、F、
S、E、L，这个排列他死不承认，因为当时他还在为音乐梦死磕着，让他承认爱钱这太
羞辱了，而且还是结婚狂？但我发现他确实是这样的人，演出有点演出费就赶紧寄家去
，还闹过这样的笑话，赚了400块，他好意思地跟别人借一百，说凑个整。爱钱不是坏
事，
事业（Enterprise） 答案其实很简单,就是用你的潜意识告诉你最想要的是什么
。不知道自己要什么，这是很普遍的问题，因为什么都挺重要的，舍弃什么都不成体统
，只是每个人的人生追求确实差异很大，看别人追求事业，你也羡慕也很想这样，但不
知道为什么总做不到；看别人婚姻幸福，你也很想，可实现起来确实不容易，这和运气
也不是太有关系，而是你需要的决定了很多。 我知道，一定有人看了这个答案
觉得很失望，就这个呀，这能说明什么呀？别看答案简单，其实这里面既包含这你的价
值观，也是对你人生有预示的。 我说两个故事吧。这故事中的两个人是很典型
的，都是测过这个游戏的。一个是我以前乐队成员，贝斯手，当时他写下的是：M、F、
S、E、L，这个排列他死不承认，因为当时他还在为音乐梦死磕着，让他承认爱钱这太
羞辱了，而且还是结婚狂？但我发现他确实是这样的人，演出有点演出费就赶紧寄家去
，还闹过这样的笑话，赚了400块，他好意思地跟别人借一百，说凑个整。爱钱不是坏
事，
C*t
9 楼
注意要诚实。
一同要求入境、说明身份和接受检查。
两人定居地不同，即使是一家人也要分开两张报关单。
一同要求入境、说明身份和接受检查。
两人定居地不同，即使是一家人也要分开两张报关单。
A*i
10 楼
E
S
【在 m*****3 的大作中提到】
: M与未婚妻F相会结婚，但两人一河相隔，M必须要借船过河才能见到F，于是他开始四处
: 找船。
: 这时见一个女子L刚好有船，M跟L借，L遇到M后爱上了他，就问：我爱上你了，你
: 爱我吗？M比较诚实，说：对不起，我有未婚妻，我不能爱你。这么一来，L死活是不把
: 船借给M，她的理由是：我爱你，你不爱我，这不公平，我不会借你的！
: M很沮丧，继续找船，刚好见一位叫S的女子，就向她借船，S说：我借给你没问题，但
: 有个条件，我很喜欢你，你是不是喜欢我无所谓，但你必须留下陪我一晚，不然我不借
: 你。M很为难，L不借他船，S如果再不借他的话就过不去河与F相见了，据说这个地方只
: 有这两条船。为了彼岸的未婚妻，他不得不同意了S的要求，与S有了一夜情。次日，S
: 遵守承诺把船借给了M。
S
【在 m*****3 的大作中提到】
: M与未婚妻F相会结婚，但两人一河相隔，M必须要借船过河才能见到F，于是他开始四处
: 找船。
: 这时见一个女子L刚好有船，M跟L借，L遇到M后爱上了他，就问：我爱上你了，你
: 爱我吗？M比较诚实，说：对不起，我有未婚妻，我不能爱你。这么一来，L死活是不把
: 船借给M，她的理由是：我爱你，你不爱我，这不公平，我不会借你的！
: M很沮丧，继续找船，刚好见一位叫S的女子，就向她借船，S说：我借给你没问题，但
: 有个条件，我很喜欢你，你是不是喜欢我无所谓，但你必须留下陪我一晚，不然我不借
: 你。M很为难，L不借他船，S如果再不借他的话就过不去河与F相见了，据说这个地方只
: 有这两条船。为了彼岸的未婚妻，他不得不同意了S的要求，与S有了一夜情。次日，S
: 遵守承诺把船借给了M。
C*t
11 楼
一同要求入境和接受检查有助于说明身份，方便CBP了解旅客身份和旅行目的。
请不要说脏话。
请不要说脏话。
w*y
12 楼
me 2
握爪
【在 A***i 的大作中提到】
: E
:
: S
握爪
【在 A***i 的大作中提到】
: E
:
: S
t*i
13 楼
谢谢！主要是我女朋友英文太差了。也就是说一同入境正常情况下应该没有什么问题吧？
【在 C*****t 的大作中提到】
: 一同要求入境和接受检查有助于说明身份，方便CBP了解旅客身份和旅行目的。
: 请不要说脏话。
【在 C*****t 的大作中提到】
: 一同要求入境和接受检查有助于说明身份，方便CBP了解旅客身份和旅行目的。
: 请不要说脏话。
p*l
14 楼
E > M > S > L > F
r*e
15 楼
我跟你一样耶，看来我很正常！
【在 p*********l 的大作中提到】
: E > M > S > L > F
【在 p*********l 的大作中提到】
: E > M > S > L > F
p*l
16 楼
握爪！也许我们都不正常呢？:)
我觉得哈：
E 没啥可说的，因为这件事过去了，M没啥错，别人跟她也没关系；
M 不那么做的话就没办法见F，是出于无奈，没太大问题；
S 是真小人，她就是＂喜欢＂就是想得到，明白的说了，没有拿＂爱情＂当晃子；
L 是伪君子，她如果真的是＂爱＂M，就不应该有这么强的占有欲，应该让M去见F，占有不是爱情；
F 脑子进水了
【在 r********e 的大作中提到】
: 我跟你一样耶，看来我很正常！
我觉得哈：
E 没啥可说的，因为这件事过去了，M没啥错，别人跟她也没关系；
M 不那么做的话就没办法见F，是出于无奈，没太大问题；
S 是真小人，她就是＂喜欢＂就是想得到，明白的说了，没有拿＂爱情＂当晃子；
L 是伪君子，她如果真的是＂爱＂M，就不应该有这么强的占有欲，应该让M去见F，占有不是爱情；
F 脑子进水了
【在 r********e 的大作中提到】
: 我跟你一样耶，看来我很正常！
r*e
17 楼
nod
狂同意
占有不是爱情；
【在 p*********l 的大作中提到】
: 握爪！也许我们都不正常呢？:)
: 我觉得哈：
: E 没啥可说的，因为这件事过去了，M没啥错，别人跟她也没关系；
: M 不那么做的话就没办法见F，是出于无奈，没太大问题；
: S 是真小人，她就是＂喜欢＂就是想得到，明白的说了，没有拿＂爱情＂当晃子；
: L 是伪君子，她如果真的是＂爱＂M，就不应该有这么强的占有欲，应该让M去见F，占有不是爱情；
: F 脑子进水了
狂同意
占有不是爱情；
【在 p*********l 的大作中提到】
: 握爪！也许我们都不正常呢？:)
: 我觉得哈：
: E 没啥可说的，因为这件事过去了，M没啥错，别人跟她也没关系；
: M 不那么做的话就没办法见F，是出于无奈，没太大问题；
: S 是真小人，她就是＂喜欢＂就是想得到，明白的说了，没有拿＂爱情＂当晃子；
: L 是伪君子，她如果真的是＂爱＂M，就不应该有这么强的占有欲，应该让M去见F，占有不是爱情；
: F 脑子进水了
A*r
18 楼
讲得好。
占有不是爱情；
【在 p*********l 的大作中提到】
: 握爪！也许我们都不正常呢？:)
: 我觉得哈：
: E 没啥可说的，因为这件事过去了，M没啥错，别人跟她也没关系；
: M 不那么做的话就没办法见F，是出于无奈，没太大问题；
: S 是真小人，她就是＂喜欢＂就是想得到，明白的说了，没有拿＂爱情＂当晃子；
: L 是伪君子，她如果真的是＂爱＂M，就不应该有这么强的占有欲，应该让M去见F，占有不是爱情；
: F 脑子进水了
占有不是爱情；
【在 p*********l 的大作中提到】
: 握爪！也许我们都不正常呢？:)
: 我觉得哈：
: E 没啥可说的，因为这件事过去了，M没啥错，别人跟她也没关系；
: M 不那么做的话就没办法见F，是出于无奈，没太大问题；
: S 是真小人，她就是＂喜欢＂就是想得到，明白的说了，没有拿＂爱情＂当晃子；
: L 是伪君子，她如果真的是＂爱＂M，就不应该有这么强的占有欲，应该让M去见F，占有不是爱情；
: F 脑子进水了
l*u
19 楼
好准！ E, M, F, L, S.
让我认识了不了解的自己。谢谢！
让我认识了不了解的自己。谢谢！
相关阅读
OpenStack的东西是不是学起来很难看看学不会鼓吹的Azure有多可怜来，周末福利，cap理论里面的三种策略目前看就是做web，python也被落在最后科技日新月异，知识淘汰如换衣履，Haskell有什么公司在用呀？争论个鬼，产品才是硬道理请问一个regex的问题如何实现程序返回的验证码通过语音打到用户电话上rails和java,c#的rest web services比较，有何优缺点？C++ 模板的技术问题A家一个system designe, 求大牛指点专访Mozilla宫力--这个大叔也满嘴跑火车啊你们有没有一种感觉，其实big data印度有哪些出名的程序员？中国呢？一般操作很多的数据用什么数据结构？各位英雄住手买macbook pro到哪买划算？今天没有上班,说一个FEATURE吧,concept litesoap, ejb和database的共同点