VBA를 사용하여 Excel xlsm 파일을 PHP 스크립트에 업로드

Question

VBA에서 Excel xlsm 파일을 PHP 스크립트에 업로드하고 싶습니다.

Dim WinHttpReq As Object 
Set WinHttpReq = CreateObject("WinHttp.WinHttpRequest.5.1") 

Dim strURL As String 
Dim StrFileName As String 
Dim FormFields As String 
Dim path As String 
Dim name As String 

    StrFileName = "c:\temp\ctc1output.xls" 
    strURL = "http://www.tri-simulation.com/P3/" 


    WinHttpReq.Open "POST", strURL, False 


    ' Set the header 
    WinHttpReq.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded" 


    FormFields = """fileulp=" & StrFileName & """" 
    FormFields = FormFields + "&" 
    FormFields = FormFields + """sfpath=P3""" 

    WinHttpReq.Send FormFields 


    ' Display the status code and response headers. 
    MsgBox WinHttpReq.GetAllResponseHeaders 
    MsgBox WinHttpReq.ResponseText 

1. 내가 바이너리 파일이나 파일의 다른 형식으로 파일을 처리해야 : 나는 다음과 같은 코드를 발견?
2. 파일이 아직 열려있는 상태에서 업로드 할 수 있습니까? (VBA를 실행하는 파일을 업로드하고 싶습니다)?

나는 올바른 길을 가고 있는지 잘 모르겠습니다. 헤더와 양식 필드가 무엇인지에 대해서도 확신하지 못합니다.

도움이 필요하면 Thx.

Answer 1

아무 것도 base64 인코딩 할 필요가 없습니다. 따르 sample code you have found 그러나 다만 Name 및 Value가 설계 이름입니다이

sPostData = sPostData & "--" & STR_BOUNDARY & vbCrLf & _ 
    "Content-Disposition: form-data; name=""" & Name & """" 
sPostData = sPostData & vbCrLf & vbCrLf & _ 
    pvToUtf8(Value) & vbCrLf 

... 같은 다른 텍스트 (폼 항목)을 추가 ('전에 --- 몸 코멘트 준비) 파일을 준비 전 서비스 요청에 포함시킬 실제 텍스트 pvToUtf8 구현의 경우 this Google Cloud Print service connector을 살펴보십시오. 위의 발췌 문장은 동일한 커넥터의 pvRestAddParam 기능에서 가져온 것입니다.