2013-04-26 3 views
0

venkat_file이라는 소스 파일이 있습니다. 이 형식으로 파일을 첨부하는 동안 보관 폴더에 파일을 보관해야합니다 (venkat_file_MMDDYYY). 달과 날짜 값은 내가 전에vb 스크립트에서 MMDDYYYY 형식 가져 오기

예를 특정 값으로 파일을 보관하고 싶어 (10)보다 작은 경우 : 대신 venkat_file_04262013 : venkat_file, 예를 들어 날짜 4/26/2013은, 지금은 다음과 같습니다 있도록 파일을 보관해야합니다 venkat_file_4262013.

미리 감사드립니다.

Venkat. Raybiss VBScript를하지 자사의 지적

답변

0

당신은

Dim ThisDate as string 
' 
ThisDate = format(now.month,"00") & format(now.day,"00") & format(now.year,"0000") 

업데이트

다음 사용하여 날짜를 추가 할 수 있습니다. 그래서 아래에 vbscript를 넣었습니다.

<script type="text/vbscript" id="ArchiveFile"> 
' <!-- 
Function GetNewArchiveFilename(ThisFile) 
' 
Dim ThisDay, ThisMonth, ThisYear 
Dim ThisFName 
' 
    ThisDay = day(date) 
    ThisMonth = month(date) 
    ThisYear = year(date) 
    ThisFName = Left(Thisfile, len(thisfile)-4) & FormatNumber(Thisday,0,-1) & formatnumber(Thismonth,0,-1) & formatnumber(thisyear,0,0,0,0) & right(thisfile,4) 
    'msgbox(thisfname) 
    return thisfname 
' 
End Function 
' --> 
</script> 
+0

이 될 것 VB/VBA하지만 VBScript를 – raybiss

2

이 같은 기능 할 수 :

Function FormatNum(n, totalDigits) 
    If totalDigits > Len(n) Then 
     FormatNum = String(totalDigits - Len(n),"0") & n 
    Else 
     FormatNum = n 
    End if 
End Function 

을 그리고처럼 사용

s = FormatNum(Month(Date()) , 2) & _ 
    FormatNum(Day(Date()), 2) & _ 
    Year(Date())