private short f_LoadWCFilesByArea(int lngArea)
{
My.MyApplication.Application.DoEvents();
try
{
wcServerAPI.TFileRecord wFile = new wcServerAPI.TFileRecord();
System.Windows.Forms.ListViewItem Itmx = null;
int fID = 0;
int lngFileCount = 0;
lvwFiles.Items.Clear();
lngFileCount = wcServerAPI.GetTotalFilesInArea(lngArea);
if (lngFileCount > 0)
{
pbFiles.Maximum = lngFileCount;
if (wcServerAPI.SearchFileRecByAreaName(lngArea, "", ref wFile, ref fID))
{
pbFiles.Value = pbFiles.Value + 1;
Itmx = lvwFiles.Items.Add(wFile.Name.Trim(), 2);
Itmx.SubItems.Add(wFile.Area.ToString().Trim());
Itmx.SubItems.Add(modBSMiniRPT.DateToDateString(wFile.FileTime, true).Trim());
Itmx.SubItems.Add(wFile.Uploader.Name.Trim());
Itmx.SubItems.Add(wFile.Description.Trim());
while (wcServerAPI.GetNextFileRec(wcServerAPI.FileAreaNameKey, ref wFile, ref fID))
{
if (pbFiles.Value == pbFiles.Maximum)
{
break;
}
else
{
pbFiles.Value = pbFiles.Value + 1;
Itmx = lvwFiles.Items.Add(wFile.Name.Trim(), 2);
Itmx.SubItems.Add(wFile.Area.ToString().Trim());
Itmx.SubItems.Add(modBSMiniRPT.DateToDateString(wFile.FileTime, true).Trim());
Itmx.SubItems.Add(wFile.Uploader.Name.Trim());
Itmx.SubItems.Add(wFile.Description.Trim());
}
}
if (lvwFiles.Items.Count > 0)
{
lvwFiles.Items[0].Selected = true;
}
}
}
pbFiles.Value = 0;
}
catch (Exception ex)
{
MessageBox.Show("Unexpected Error occurred" + Environment.NewLine + "Error: " + ex.ToString() + Environment.NewLine + "Message: " + ex.Message, "Unexpected Error", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
My.MyApplication.Application.DoEvents();
return 0;
}
public short PrepFiles(int lngArea, string strFileName)
{
try
{
wcServerAPI.TFileRecord wFile = new wcServerAPI.TFileRecord();
wcServerAPI.TFileArea wFileA = new wcServerAPI.TFileArea();
int fID = 0;
if (wcServerAPI.GetFileRecByAreaName(lngArea, strFileName, ref wFile, ref fID))
{
if (wcServerAPI.GetFileArea(lngArea, ref wFileA))
{
if (wcServerAPI.WcExistFile("wc:\\file\\area(" + wFileA.Number.ToString().Trim() + ")\\" + wFile.Name.Trim()))
{
lblFStatus.Text = "**File Exists On Disk**";
}
txtFileArea.Text = "(" + wFile.Area.ToString().Trim() + "). " + wFileA.name.Trim();
txtFileName.Text = wFile.Name.Trim();
txtFileSize.Text = wFile.Size.ToString("###,###,###,###,###,###,###");
txtFileUploader.Text = wFile.Uploader.Name.Trim();
txtFilePassword.Text = wFile.Password.Trim();
txtFileDate.Text = modBSMiniRPT.DateToDateString(wFile.FileTime, true).Trim();
txtFileLastAccess.Text = modBSMiniRPT.DateToDateString(wFile.LastAccessed, true).Trim();
txtFileDownloads.Text = wFile.Downloads.ToString().Trim();
txtFileDescription.Text = wFile.Description.Trim();
}
else
{
MessageBox.Show("Error pulling the area description", "WINS Error...", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.Close();
}
}
else
{
MessageBox.Show("Error pulling the selected file", "WINS Error...", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.Close();
}
}
catch (Exception ex)
{
MessageBox.Show("Unexpected Error occurred" + Environment.NewLine + "Error: " + ex.ToString() + Environment.NewLine + "Message: " + ex.Message, "Unexpected Error", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
return 0;
}
private void lvwFiles_SelectedIndexChanged(object sender, System.EventArgs e)
{
if (lvwFiles.SelectedItems.Count > 0)
{
modBSMiniRPT.MouseHour();
try
{
wcServerAPI.TFullFileRecord wFullFile = new wcServerAPI.TFullFileRecord();
wcServerAPI.TFileRecord wFile = new wcServerAPI.TFileRecord();
int fID = 0;
short myX = 0;
txtFileDesc.ForeColor = System.Drawing.Color.Red;
txtFileDesc.Text = "(No Long Description Available)";
if (wcServerAPI.GetFileRecByNameArea(lvwFiles.SelectedItems[0].Text, System.Convert.ToInt32(lvwFiles.SelectedItems[0].SubItems[1].Text), ref wFile, ref fID))
{
if (wFile.HasLongDescription != 0)
{
if (wcServerAPI.GetFullFileRec(ref wFile, ref wFullFile))
{
txtFileDesc.Text = "";
txtFileDesc.ForeColor = System.Drawing.SystemColors.WindowText;
for (myX = 0; myX <= 14; myX++)
{
if (wFullFile.LongDescription[myX].Description.Trim() != "")
{
txtFileDesc.Text = txtFileDesc.Text + wFullFile.LongDescription[myX].Description.TrimEnd(' ') + Environment.NewLine;
}
}
}
}
}
}
catch (Exception ex)
{
MessageBox.Show("Unexpected Error occurred" + Environment.NewLine + "Error: " + ex.ToString() + Environment.NewLine + "Message: " + ex.Message, "Unexpected Error", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
modBSMiniRPT.MouseNormal();
}
}
