2014-02-19 2 views
1

.vg.net을 사용하여 .MSG 파일을 통해 전자 메일을 보내고 있습니다.이 두 가지 모두 createitemfromtemplate을 사용하여 .OFT로 시도했습니다.전자 메일을 보낼 때 .MSG 파일 다시 저장

이메일은 문제없이 전송됩니다. 훌륭하게 작동합니다. 내가 가지고있는 유일한 문제는 언제든지 다시 시작할 때 .msg 또는 .oft 파일을 다시 보내려면 동일한 파일 이름으로 다시 저장해야합니다. 그렇지 않으면 더 이상 작동하지 않습니다.

왜 이런지 또는 해결 방법에 대한 의견이 있으십니까?

예 :

  Dim omsg As Object 
       omsg = Outl.CreateItemfromtemplate("Custom Two.msg") 
       omsg.To = (TextBox1.Text) 
       omsg.Subject = (TextBox2.Text) 

       omsg.Display(False) 'will display message to user 

누군가가 ..이 문제를 해결하려면 응용 프로그램로드되기 전에 메모리에 파일을 추가 제안하지만 부하 행사에가는 것보다 내가 다른이 작업을 수행하는 방법을 100 % 확실하지 않다 .. 어떤 아이디어?

+0

이 댓글을 삭제하십시오. – ShawnB

답변

0

나는 이것에 대한 가장 쉬운 것으로 판명 대답은 :

 Dim filelist() As String = Directory.GetFiles(Application.StartupPath) 
    For Each File In filelist 
     If File.Contains(".oft") Or File.Contains(".msg") Then 
      Dim temp1 As String = File.Replace(Application.StartupPath & "\", String.Empty) 
      If File.Contains(".oft") Then 
       ComboBox1.Items.Add(temp1) 
      ElseIf File.Contains(".msg") Then 
       ComboBox1.Items.Add(temp1) 
      End If 

     End If 

대신에 동적으로 연결, 이름 하나에 의해 목록 하나에 읽을려고 더 나은 적합하고 문제없이 실행하는 것 같다.

관련 문제