Web приложение
в Модуле есть функция которая пишет лог с флагом <STAThread()>
<STAThread()> _
Public Sub Write2CacheLog(ByVal ParamArray Scores() As String)
Dim I As Integer
Dim WriteTo As String = ConfigurationManager.AppSettings("CacheLogPath")
If WriteTo = "" Then
WriteTo = AppDomain.CurrentDomain.BaseDirectory
End If
Dim oWrite As New System.IO.StreamWriter(WriteTo & Now.ToString("yyyy-MM-dd") & "-Cache.log", True)
oWrite.Write(Now.ToString("HH:mm:ss") & vbTab)
For I = 0 To UBound(Scores)
oWrite.Write(Scores(I) & vbTab)
Next I
oWrite.Write(vbNewLine)
oWrite.Close()
End Sub
Как это работает почему и в чем отличие
ето отделный сред или как