Egalware/WebSCR
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

refresh vari programma di upload

Browse Source
This commit is contained in:
Samuele E. Locatelli
2015-06-15 20:13:56 +02:00
parent 2396472430
commit 959614a5ec
32 changed files with 319 additions and 398 deletions
Download Patch File Download Diff File Expand all files Collapse all files
DataUploader/FullSync.aspx.cs
+30 -4
View File
@@ -17,6 +17,11 @@ namespace DataUploader
protected void Page_Load(object sender, EventArgs e)
{
DateTime tick = DateTime.Now;
var client = new WebClient();
client.Headers[HttpRequestHeader.Accept] = "text/html, image/png, image/jpeg, image/gif, */*;q=0.1";
client.Headers[HttpRequestHeader.UserAgent] = "Mozilla/5.0 (Windows; U; Windows NT 6.1; de; rv:1.9.2.12) Gecko/20101026 Firefox/3.6.12";
client.Proxy = null;
ServicePointManager.DefaultConnectionLimit = int.MaxValue;
// verifico se vado in modalità demo o meno...
bool demoMode = false;
try
@@ -29,10 +34,10 @@ namespace DataUploader
int lastNum = 0;
try
{
var client = new WebClient();
var content = client.DownloadString(ConfigurationManager.AppSettings["remoteDocUrl"]); // http://webscr.steamware.net/Rigamonti/Upload/Document
// converto a int!
lastNum = Convert.ToInt32(content);
logger.Info("Recuperato last num: {0}", lastNum);
}
catch
{ }
@@ -45,17 +50,26 @@ namespace DataUploader
{
lblOut.Text += string.Format("<br/>{0:000}) {1}", i + 1, urlsUpdate[i]);
}
logger.Info("Effettuato DEMO upload FULL SYNC: durata {0} msec", DateTime.Now.Subtract(tick).TotalMilliseconds);
logger.Info("Effettuato DEMO upload FULL SYNC: durata {0} msec", DateTime.Now.Subtract(tick).TotalMilliseconds);
}
else
{
if (ConfigurationManager.AppSettings["debugMode"] == "true")
{
logger.Info("Inizio chiamate URL");
}
lblOut.Text = string.Format("Normal MODE!<br/>{0}", lastNum);
var client = new WebClient();
string content = "";
for (int i = 0; i < urlsUpdate.Length; i++)
{
try
{
var content = client.DownloadString(urlsUpdate[i]);
// versione SYNC
content = client.DownloadString(urlsUpdate[i]);
if (ConfigurationManager.AppSettings["debugMode"] == "true")
{
logger.Info("Chiamata, esito {0}{1}{2}, esito {1}", content, Environment.NewLine, urlsUpdate[i]);
}
}
catch
{ }
@@ -70,5 +84,17 @@ namespace DataUploader
}
}
}
/// <summary>
/// ricezione risposta URL...
/// </summary>
/// <param name="sender"></param>
/// <param name="e"></param>
protected void wc_DownloadStringCompleted(object sender, DownloadStringCompletedEventArgs e)
{
if (ConfigurationManager.AppSettings["debugMode"] == "true")
{
logger.Info("Chiamata, esito {0}", e.Result);
}
}
}
}
DataUploader/GestData.cs
+25 -1
View File
@@ -45,6 +45,10 @@ namespace DataUploader
public string[] getNewDocsUrls(int numeroFrom)
{
if (ConfigurationManager.AppSettings["debugMode"] == "true")
{
logger.Info("Inizio getNewDocsUrls");
}
// ipotesi: si caricano maxDocsToUpload documenti alal volta (e quindi altrettanti clienti)
int maxDocsToUpload = Convert.ToInt32(ConfigurationManager.AppSettings["maxDocsToUpload"]);
@@ -54,7 +58,7 @@ namespace DataUploader
string comandoDoc;
// qui va fatto ciclo x spazzare 1 ad 1 i docuemnti ed i relativi clienti
if (!Convert.ToBoolean(ConfigurationManager.AppSettings["queryFormatDB2"]))
if (false)
{ // query in formato ACCESS 2010
comandoDoc = string.Format(@"SELECT TOP {0}
TESDOCUM.TIPOPROTOC, TESDOCUM.NUMERO, TESDOCUM.ESERPROTOC,
@@ -93,6 +97,10 @@ namespace DataUploader
try
{
conn.Open();
if (ConfigurationManager.AppSettings["debugMode"] == "true")
{
logger.Info("Aperta connessione ODBC");
}
// dati documento
int num = 0;
@@ -114,6 +122,11 @@ namespace DataUploader
}
}
//if (ConfigurationManager.AppSettings["debugMode"] == "true")
//{
// logger.Info("Completata lettura ODBC x DOC");
//}
// il campo 12 è il cod cliente!
rCli[0] = rDoc[12];
@@ -152,6 +165,12 @@ namespace DataUploader
}
}
}
//if (ConfigurationManager.AppSettings["debugMode"] == "true")
//{
// logger.Info("Completata lettura ODBC x CLI");
//}
// formatto answ... prima CLI poi DOCS...
answ[num++] = createUrlCli(rCli);
answ[num++] = createUrlDoc(rDoc);
@@ -174,6 +193,11 @@ namespace DataUploader
conn.Close();
}
if (ConfigurationManager.AppSettings["debugMode"] == "true")
{
logger.Info("Chiusura connessione ODBC");
}
// end ciclo, resituisco tutti i records
return answ;
}
DataUploader/Properties/PublishProfiles/Zip.pubxml
+3 -4
View File
@@ -5,14 +5,13 @@ by editing this MSBuild file. In order to learn more about this please visit htt
-->
<Project ToolsVersion="4.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<WebPublishMethod>Package</WebPublishMethod>
<WebPublishMethod>FileSystem</WebPublishMethod>
<LastUsedBuildConfiguration>Release</LastUsedBuildConfiguration>
<LastUsedPlatform>Any CPU</LastUsedPlatform>
<SiteUrlToLaunchAfterPublish />
<LaunchSiteAfterPublish>True</LaunchSiteAfterPublish>
<ExcludeApp_Data>False</ExcludeApp_Data>
<DesktopBuildPackageLocation>C:\Users\samuele\Documents\Visual Studio 2012\Projects\WebSCR\ReleaseClienti\DataUploader.zip</DesktopBuildPackageLocation>
<PackageAsSingleFile>true</PackageAsSingleFile>
<DeployIisAppPath>Default Web Site/DataUploader</DeployIisAppPath>
<publishUrl>C:\Users\samuele\Documents\Visual Studio 2012\Projects\WebSCR\ReleaseClienti\DataUploader</publishUrl>
<DeleteExistingFiles>False</DeleteExistingFiles>
</PropertyGroup>
</Project>
DataUploader/Properties/PublishProfiles/Zip.pubxml.user
+3 -3
View File
@@ -6,11 +6,11 @@ by editing this MSBuild file. In order to learn more about this please visit htt
<Project ToolsVersion="4.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<TimeStampOfAssociatedLegacyPublishXmlFile />
<_PublishTargetUrl>C:\Users\samuele\Documents\Visual Studio 2012\Projects\WebSCR\ReleaseClienti</_PublishTargetUrl>
<_PublishTargetUrl>C:\Users\samuele\Documents\Visual Studio 2012\Projects\WebSCR\ReleaseClienti\DataUploader</_PublishTargetUrl>
</PropertyGroup>
<ItemGroup>
<File Include="bin/DataUploader.dll">
<publishTime>06/15/2015 12:08:18</publishTime>
<publishTime>06/15/2015 19:50:01</publishTime>
</File>
<File Include="bin/NLog.config">
<publishTime>06/15/2015 12:03:55</publishTime>
@@ -46,7 +46,7 @@ by editing this MSBuild file. In order to learn more about this please visit htt
<publishTime>06/15/2015 12:00:13</publishTime>
</File>
<File Include="Web.config">
<publishTime>06/15/2015 12:08:18</publishTime>
<publishTime>06/15/2015 19:31:11</publishTime>
</File>
</ItemGroup>
</Project>
DataUploader/SyncDoc.aspx.cs
+6
View File
@@ -48,11 +48,17 @@ namespace DataUploader
{
lblOut.Text = string.Format("Dati caricati!<br/>DOC: {0}/{1}", DOC, Anno);
var client = new WebClient();
client.Headers[HttpRequestHeader.Accept] = "text/html, image/png, image/jpeg, image/gif, */*;q=0.1";
client.Headers[HttpRequestHeader.UserAgent] = "Mozilla/5.0 (Windows; U; Windows NT 6.1; de; rv:1.9.2.12) Gecko/20101026 Firefox/3.6.12";
for (int i = 0; i < urlsUpdate.Length; i++)
{
try
{
var content = client.DownloadString(urlsUpdate[i]);
if (ConfigurationManager.AppSettings["debugMode"] == "true")
{
logger.Info("Chiamata, esito {0}{1}{2}{1}", content, Environment.NewLine, urlsUpdate[i]);
}
}
catch
{ }
DataUploader/Web.config
+2 -2
View File
@@ -2,10 +2,10 @@
<configuration>
<appSettings>
<!--parametri base-->
<add key="maxDocsToUpload" value="50" />
<add key="maxDocsToUpload" value="2" />
<add key="remoteDocUrl" value="http://webscr.steamware.net/Rigamonti/Upload/Document" />
<add key="remoteCliUrl" value="http://webscr.steamware.net/Rigamonti/Upload/Client" />
<add key="queryFormatDB2" value="true"/>
<add key="debugMode" value="true" />
<!--connessione su un MDB di cui esiste un DSN-->
<!--<add key="connString" value="Dsn=DB_Sigla32;Initial Catalog=TESDOCUM;" />-->
DataUploader/bin/DataUploader.dll
BIN
View File
Binary file not shown.
DataUploader/logs/2015-06-15.log
+45
View File
@@ -0,0 +1,45 @@
2015-06-15 13:35:16.3256 [ERROR] Eccezione
System.Data.Odbc.OdbcException (0x80131937): ERROR [IM002] [Microsoft][Driver Manager ODBC] Nome origine dati non trovato e driver predefinito non specificato.
in System.Data.Odbc.OdbcConnection.HandleError(OdbcHandle hrHandle, RetCode retcode)
in System.Data.Odbc.OdbcConnectionHandle..ctor(OdbcConnection connection, OdbcConnectionString constr, OdbcEnvironmentHandle environmentHandle)
in System.Data.Odbc.OdbcConnectionOpen..ctor(OdbcConnection outerConnection, OdbcConnectionString connectionOptions)
in System.Data.Odbc.OdbcConnectionFactory.CreateConnection(DbConnectionOptions options, DbConnectionPoolKey poolKey, Object poolGroupProviderInfo, DbConnectionPool pool, DbConnection owningObject)
in System.Data.ProviderBase.DbConnectionFactory.CreateConnection(DbConnectionOptions options, DbConnectionPoolKey poolKey, Object poolGroupProviderInfo, DbConnectionPool pool, DbConnection owningConnection, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionFactory.CreateNonPooledConnection(DbConnection owningConnection, DbConnectionPoolGroup poolGroup, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionFactory.TryGetConnection(DbConnection owningConnection, TaskCompletionSource`1 retry, DbConnectionOptions userOptions, DbConnectionInternal oldConnection, DbConnectionInternal& connection)
in System.Data.ProviderBase.DbConnectionInternal.TryOpenConnectionInternal(DbConnection outerConnection, DbConnectionFactory connectionFactory, TaskCompletionSource`1 retry, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionClosed.TryOpenConnection(DbConnection outerConnection, DbConnectionFactory connectionFactory, TaskCompletionSource`1 retry, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionInternal.OpenConnection(DbConnection outerConnection, DbConnectionFactory connectionFactory)
in System.Data.Odbc.OdbcConnection.Open()
in DataUploader.GestData.getDocsUrls(String CodDoc, String Anno) in c:\Users\samuele\Documents\Visual Studio 2012\Projects\WebSCR\DataUploader\GestData.cs:riga 196
2015-06-15 13:35:16.3406 [INFO] Effettuato DEMO upload singolo documento: durata 98,0086 msec
2015-06-15 15:44:25.8976 [ERROR] Eccezione
System.Data.Odbc.OdbcException (0x80131937): ERROR [IM002] [Microsoft][Driver Manager ODBC] Nome origine dati non trovato e driver predefinito non specificato.
in System.Data.Odbc.OdbcConnection.HandleError(OdbcHandle hrHandle, RetCode retcode)
in System.Data.Odbc.OdbcConnectionHandle..ctor(OdbcConnection connection, OdbcConnectionString constr, OdbcEnvironmentHandle environmentHandle)
in System.Data.Odbc.OdbcConnectionOpen..ctor(OdbcConnection outerConnection, OdbcConnectionString connectionOptions)
in System.Data.Odbc.OdbcConnectionFactory.CreateConnection(DbConnectionOptions options, DbConnectionPoolKey poolKey, Object poolGroupProviderInfo, DbConnectionPool pool, DbConnection owningObject)
in System.Data.ProviderBase.DbConnectionFactory.CreateConnection(DbConnectionOptions options, DbConnectionPoolKey poolKey, Object poolGroupProviderInfo, DbConnectionPool pool, DbConnection owningConnection, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionFactory.CreateNonPooledConnection(DbConnection owningConnection, DbConnectionPoolGroup poolGroup, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionFactory.TryGetConnection(DbConnection owningConnection, TaskCompletionSource`1 retry, DbConnectionOptions userOptions, DbConnectionInternal oldConnection, DbConnectionInternal& connection)
in System.Data.ProviderBase.DbConnectionInternal.TryOpenConnectionInternal(DbConnection outerConnection, DbConnectionFactory connectionFactory, TaskCompletionSource`1 retry, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionClosed.TryOpenConnection(DbConnection outerConnection, DbConnectionFactory connectionFactory, TaskCompletionSource`1 retry, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionInternal.OpenConnection(DbConnection outerConnection, DbConnectionFactory connectionFactory)
in System.Data.Odbc.OdbcConnection.Open()
in DataUploader.GestData.getDocsUrls(String CodDoc, String Anno) in c:\Users\samuele\Documents\Visual Studio 2012\Projects\WebSCR\DataUploader\GestData.cs:riga 220
2015-06-15 15:44:25.9126 [INFO] Effettuato DEMO upload singolo documento: durata 100,0064 msec
2015-06-15 16:20:55.5255 [ERROR] Eccezione
System.Data.Odbc.OdbcException (0x80131937): ERROR [IM002] [Microsoft][Driver Manager ODBC] Nome origine dati non trovato e driver predefinito non specificato.
in System.Data.Odbc.OdbcConnection.HandleError(OdbcHandle hrHandle, RetCode retcode)
in System.Data.Odbc.OdbcConnectionHandle..ctor(OdbcConnection connection, OdbcConnectionString constr, OdbcEnvironmentHandle environmentHandle)
in System.Data.Odbc.OdbcConnectionOpen..ctor(OdbcConnection outerConnection, OdbcConnectionString connectionOptions)
in System.Data.Odbc.OdbcConnectionFactory.CreateConnection(DbConnectionOptions options, DbConnectionPoolKey poolKey, Object poolGroupProviderInfo, DbConnectionPool pool, DbConnection owningObject)
in System.Data.ProviderBase.DbConnectionFactory.CreateConnection(DbConnectionOptions options, DbConnectionPoolKey poolKey, Object poolGroupProviderInfo, DbConnectionPool pool, DbConnection owningConnection, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionFactory.CreateNonPooledConnection(DbConnection owningConnection, DbConnectionPoolGroup poolGroup, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionFactory.TryGetConnection(DbConnection owningConnection, TaskCompletionSource`1 retry, DbConnectionOptions userOptions, DbConnectionInternal oldConnection, DbConnectionInternal& connection)
in System.Data.ProviderBase.DbConnectionInternal.TryOpenConnectionInternal(DbConnection outerConnection, DbConnectionFactory connectionFactory, TaskCompletionSource`1 retry, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionClosed.TryOpenConnection(DbConnection outerConnection, DbConnectionFactory connectionFactory, TaskCompletionSource`1 retry, DbConnectionOptions userOptions)
in System.Data.ProviderBase.DbConnectionInternal.OpenConnection(DbConnection outerConnection, DbConnectionFactory connectionFactory)
in System.Data.Odbc.OdbcConnection.Open()
in DataUploader.GestData.getDocsUrls(String CodDoc, String Anno) in c:\Users\samuele\Documents\Visual Studio 2012\Projects\WebSCR\DataUploader\GestData.cs:riga 220
2015-06-15 16:20:55.5405 [INFO] Effettuato DEMO upload singolo documento: durata 115,0185 msec
ReleaseClienti/DataUploader.SetParameters.xml
-4
View File
@@ -1,4 +0,0 @@
<?xml version="1.0" encoding="utf-8"?>
<parameters>
<setParameter name="IIS Web Application Name" value="Default Web Site/DataUploader" />
</parameters>
ReleaseClienti/DataUploader.SourceManifest.xml
-6
View File
@@ -1,6 +0,0 @@
<?xml version="1.0" encoding="utf-8"?>
<sitemanifest>
<IisApp path="C:\Users\samuele\documents\visual studio 2012\Projects\WebSCR\DataUploader\obj\Release\Package\PackageTmp" managedRuntimeVersion="v4.0" />
<setAcl path="C:\Users\samuele\documents\visual studio 2012\Projects\WebSCR\DataUploader\obj\Release\Package\PackageTmp" setAclResourceType="Directory" />
<setAcl path="C:\Users\samuele\documents\visual studio 2012\Projects\WebSCR\DataUploader\obj\Release\Package\PackageTmp" setAclUser="anonymousAuthenticationUser" setAclResourceType="Directory" />
</sitemanifest>
ReleaseClienti/DataUploader.deploy-readme.txt
-63
View File
@@ -1,63 +0,0 @@
===========================
Prerequisites :
--------------------------
To deploy this Web package, Web Deploy (msdeploy.exe) must be installed on the computer that runs the .cmd file. For information about how to install Web Deploy, see the following URL:
http://go.microsoft.com/?linkid=9278654
This batch file requires that the package file "DataUploader.zip" and optionally provided the parameters file "DataUploader.SetParameters.xml" in the same folder or destination folder by environment variable.
===========================
Usage:
--------------------------
DataUploader.deploy.cmd [/T|/Y] [/M:ComputerName] [/U:UserName] [/P:Password] [/G:UseTempAgent] [Additional msdeploy.exe flags ...]
===========================
Required Flags:
--------------------------
/T:
Calls msdeploy.exe with the "-whatif" flag, which simulates deployment. This does not deploy the package. Instead, it creates a report of what will happen when you actually deploy the package.
/Y:
Calls msdeploy.exe without the "-whatif" flag, which deploys the package to the current machine or a destination server. Use /Y after you have verified the output that was generated by using the /T flag.
Note: Do not use /T and /Y in the same command.
===========================
Optional Flags:
--------------------------
By Default, this script deploy on the current machine where this script is called with current user credential without agent service. Only pass the following value for advance scenario.
/M:<Destination server name or Service URL>
If this flag is not specified, the package is installed on the computer where the command is run. The Service URL can be in the following format:
https://<DestinationServer>:8172/MSDeploy.axd
This format requires that IIS 7 be installed on the destination server and that IIS 7 Web Management Service(WMSvc) and Web Deployment Handler be set up.
The service URL can also be in the following format:
http://<DestinationServer>/MSDeployAgentService
This format requires administrative rights on the destination server, and it requires that Web Deploy Remote Service (MsDepSvc) be installed on the destination server. IIS 7 does not have to be installed on the destination server.
/U:<UserName>
/P:<Password>
/G:<True | False>
Specifies that the package is deployed by creating a temporary listener on the destination server. This requires no special installation on the destination server, but it requires you to be an administrator on that server. The default value of this flag is False.
/A:<Basic | NTLM>
Specifies the type of authentication to be used. The possible values are NTLM and Basic. If the wmsvc provider setting is specified, the default authentication type is Basic; otherwise, the default authentication type is NTLM.
/L
Specifies that the package is deployed to local IISExpress user instance.
[Additional msdeploy.exe flags]
The msdeploy.exe command supports additional flags. You can include any of these additional flags in the "$(ProjectName).Deploy.cmd" file, and the flags are passed through to msdeploy.exe during execution.
Alternatively, you can specify additional flags by setting the "_MsDeployAdditionalFlags" environment variable. These settings are used by this batch file.
Note: Any flag value that includes an equal sign (=) must be enclosed in double quotation marks, as shown in the following example, which will skip deploying the databases that are included in the package:
"-skip:objectName=dbFullSql"
===========================
Environment-Specific Settings:
--------------------------
To customize application-specific settings for each deployment environment (for example, the IIS application name, the physical path, and any connection strings), edit the settings in the following file:
"DataUploader.SetParameters.xml"
===========================
For more information on this deploy script visit: http://go.microsoft.com/fwlink/?LinkID=183544
ReleaseClienti/DataUploader.deploy.cmd
-311
View File
@@ -1,311 +0,0 @@
@rem ---------------------------------------------------------------------------------
@rem Copyright 2008 Microsoft Corporation. All rights reserved.
@rem This is provided as sample to deploy the package using msdeploy.exe
@rem For information about IIS Web Deploy technology,
@rem please visit http://go.microsoft.com/?linkid=9278654
@rem Note: This batch file assumes the package and setparametsrs.xml are in the same folder with this file
@rem ---------------------------------------------------------------------------------
@if %_echo%!==! echo off
setlocal
@rem ---------------------------------------------------------------------------------
@rem Please Make sure you have Web Deploy install in your machine.
@rem Alternatively, you can explicit set the MsDeployPath to the location it is on your machine
@rem set MSDeployPath="C:\Program Files (x86)\IIS\Microsoft Web Deploy V3\"
@rem ---------------------------------------------------------------------------------
@rem ---------------------------------------------------------------------------------
@rem if user does not set MsDeployPath environment variable, we will try to retrieve it from registry.
@rem ---------------------------------------------------------------------------------
if "%MSDeployPath%" == "" (
for /F "usebackq tokens=1,2,*" %%h in (`reg query "HKLM\SOFTWARE\Microsoft\IIS Extensions\MSDeploy" /s ^| findstr -i "InstallPath"`) do (
if /I "%%h" == "InstallPath" (
if /I "%%i" == "REG_SZ" (
if not "%%j" == "" (
if "%%~dpj" == "%%j" (
set MSDeployPath=%%j
))))))
@rem ------------------------------------------
@rem ------------------------------------------
if not exist "%MSDeployPath%msdeploy.exe" (
echo. msdeploy.exe is not found on this machine. Please install Web Deploy before execute the script.
echo. Please visit http://go.microsoft.com/?linkid=9278654
goto :usage
)
set RootPath=%~dp0
if /I "%_DeploySetParametersFile%" == "" (
set _DeploySetParametersFile=%RootPath%DataUploader.SetParameters.xml
)
@rem ------------------------------------------
@rem ------------------------------------------
set _ArgTestDeploy=
set _ArgDestinationType=auto
set _ArgComputerNameWithQuote=""
set _ArgUserNameWithQuote=""
set _ArgPasswordWithQuote=""
set _ArgEncryptPasswordWithQuote=""
set _ArgIncludeAclsWithQuote="False"
set _ArgAuthTypeWithQuote=""
set _ArgtempAgentWithQuote=""
set _ArgLocalIIS=
set _ArgLocalIISVersion=
set _HaveArgMSDeployAdditonalFlags=
@rem ---------------------------------------------------------------------------------
@rem Simple Parse the arguments
@rem ---------------------------------------------------------------------------------
:NextArgument
set _ArgCurrent=%~1
set _ArgFlagFirst=%_ArgCurrent:~0,1%
set _ArgFlag=%_ArgCurrent:~0,3%
set _ArgValue=%_ArgCurrent:~3%
if /I "%_ArgFlag%" == "" goto :GetStarted
if /I "%_ArgFlag%" == "~0,3" goto :GetStarted
if /I "%_ArgFlag%" == "/T" set _ArgTestDeploy=true&goto :ArgumentOK
if /I "%_ArgFlag%" == "/Y" set _ArgTestDeploy=false&goto :ArgumentOK
if /I "%_ArgFlag%" == "/L" set _ArgLocalIIS=true&goto :ArgumentOK
if /I "%_ArgFlag%" == "/M:" set _ArgComputerNameWithQuote="%_ArgValue%"&goto :ArgumentOK
if /I "%_ArgFlag%" == "/U:" set _ArgUserNameWithQuote="%_ArgValue%"&goto :ArgumentOK
if /I "%_ArgFlag%" == "/P:" set _ArgPasswordWithQuote="%_ArgValue%"&goto :ArgumentOK
if /I "%_ArgFlag%" == "/E:" set _ArgEncryptPasswordWithQuote="%_ArgValue%"&goto :ArgumentOK
if /I "%_ArgFlag%" == "/I:" set _ArgIncludeAclsWithQuote="%_ArgValue%"&goto :ArgumentOK
if /I "%_ArgFlag%" == "/A:" set _ArgAuthTypeWithQuote="%_ArgValue%"&goto :ArgumentOK
if /I "%_ArgFlag%" == "/G:" set _ArgtempAgentWithQuote="%_ArgValue%"&goto :ArgumentOK
@rem Any addition flags, pass through to the msdeploy
if "%_HaveArgMSDeployAdditonalFlags%" == "" (
goto :Assign_ArgMsDeployAdditionalFlags
)
set _ArgMsDeployAdditionalFlags=%_ArgMsDeployAdditionalFlags:&=^&% %_ArgCurrent:&=^&%
set _HaveArgMSDeployAdditonalFlags=1
goto :ArgumentOK
:Assign_ArgMsDeployAdditionalFlags
set _ArgMsDeployAdditionalFlags=%_ArgCurrent:&=^&%
set _HaveArgMSDeployAdditonalFlags=1
goto :ArgumentOK
:ArgumentOK
shift
goto :NextArgument
:GetStarted
@rem ------------------------------------------
@rem ------------------------------------------
if /I "%_ArgTestDeploy%" == "" goto :usage
if /I "%_ArgDestinationType%" == "" goto :usage
set _Destination=%_ArgDestinationType%
if not %_ArgComputerNameWithQuote% == "" set _Destination=%_Destination%,computerName=%_ArgComputerNameWithQuote%
if not %_ArgUserNameWithQuote% == "" set _Destination=%_Destination%,userName=%_ArgUserNameWithQuote%
if not %_ArgPasswordWithQuote% == "" set _Destination=%_Destination%,password=%_ArgPasswordWithQuote%
if not %_ArgAuthTypeWithQuote% == "" set _Destination=%_Destination%,authtype=%_ArgAuthTypeWithQuote%
if not %_ArgEncryptPasswordWithQuote% == "" set _Destination=%_Destination%,encryptPassword=%_ArgEncryptPasswordWithQuote%
if not %_ArgIncludeAclsWithQuote% == "" set _Destination=%_Destination%,includeAcls=%_ArgIncludeAclsWithQuote%
if not %_ArgtempAgentWithQuote% == "" set _Destination=%_Destination%,tempAgent=%_ArgtempAgentWithQuote%
@rem ------------------------------------------
@rem ------------------------------------------
@rem ---------------------------------------------------------------------------------
@rem add -whatif when -T is specified
@rem ---------------------------------------------------------------------------------
if /I "%_ArgTestDeploy%" NEQ "false" (
set _MsDeployAdditionalFlags=-whatif %_MsDeployAdditionalFlags%
)
@rem ------------------------------------------
@rem ------------------------------------------
@rem ---------------------------------------------------------------------------------
@rem add flags for IISExpress when -L is specified
@rem ---------------------------------------------------------------------------------
if /I "%_ArgLocalIIS%" == "true" (
call :SetIISExpressArguments
)
if /I "%_ArgLocalIIS%" == "true" (
if not exist "%IISExpressPath%%IISExpressManifest%" (
echo. IISExpress is not found on this machine. Please install through Web Platform Installer before execute the script.
echo. or remove /L flag
echo. Please visit http://go.microsoft.com/?linkid=9278654
goto :usage
)
if not exist "%IISExpressUserProfileDirectory%" (
echo. %IISExpressUserProfileDirectory% is not exists
echo. IISExpress is found on the machine. But the user have run IISExpress at least once.
echo. Please visit http://go.microsoft.com/?linkid=9278654 for detail
goto :usage
)
set _MsDeployAdditionalFlags=%_MsDeployAdditionalFlags% -appHostConfigDir:%IISExpressUserProfileDirectory% -WebServerDir:"%IISExpressPath%" -webServerManifest:"%IISExpressManifest%"
)
@rem ---------------------------------------------------------------------------------
@rem check the existence of the package file
@rem ---------------------------------------------------------------------------------
if not exist "%RootPath%DataUploader.zip" (
echo "%RootPath%DataUploader.zip" does not exist.
echo This batch file relies on this deploy source file^(s^) in the same folder.
goto :usage
)
@rem ---------------------------------------------
@rem ---------------------------------------------
@rem ---------------------------------------------------------------------------------
@rem Execute msdeploy.exe command line
@rem ---------------------------------------------------------------------------------
call :CheckParameterFile
echo. Start executing msdeploy.exe
echo -------------------------------------------------------
if not exist "%_DeploySetParametersFile%" (
set _MSDeployCommandline="%MSDeployPath%msdeploy.exe" -source:package='%RootPath%DataUploader.zip' -dest:%_Destination% -verb:sync -disableLink:AppPoolExtension -disableLink:ContentExtension -disableLink:CertificateExtension
) else (
set _MSDeployCommandline="%MSDeployPath%msdeploy.exe" -source:package='%RootPath%DataUploader.zip' -dest:%_Destination% -verb:sync -disableLink:AppPoolExtension -disableLink:ContentExtension -disableLink:CertificateExtension -setParamFile:"%_DeploySetParametersFile%"
)
if "%_HaveArgMSDeployAdditonalFlags%" == "" (
goto :MSDeployWithOutArgMsDeployAdditionalFlag
)
goto :MSDeployWithArgMsDeployAdditionalFlag
goto :eof
@rem ---------------------------------------------------------------------------------
@rem MSDeployWithArgMsDeployAdditionalFlag
@rem ---------------------------------------------------------------------------------
:MSDeployWithArgMsDeployAdditionalFlag
echo. %_MSDeployCommandline% %_MsDeployAdditionalFlags% %_ArgMsDeployAdditionalFlags:&=^&%
%_MSDeployCommandline% %_MsDeployAdditionalFlags% %_ArgMsDeployAdditionalFlags:&=^&%
goto :eof
@rem ---------------------------------------------------------------------------------
@rem MSDeployWithOutArgMsDeployAdditionalFlag
@rem ---------------------------------------------------------------------------------
:MSDeployWithOutArgMsDeployAdditionalFlag
echo. %_MSDeployCommandline% %_MsDeployAdditionalFlags%
%_MSDeployCommandline% %_MsDeployAdditionalFlags%
goto :eof
@rem ---------------------------------------------------------------------------------
@rem Find and set IISExpress argument.
@rem ---------------------------------------------------------------------------------
:SetIISExpressArguments
if "%IISExpressPath%" == "" (
for /F "usebackq tokens=1,2,*" %%h in (`reg query "HKLM\SOFTWARE\Microsoft\IISExpress" /s ^| findstr -i "InstallPath"`) do (
if /I "%%h" == "InstallPath" (
if /I "%%i" == "REG_SZ" (
if not "%%j" == "" (
if "%%~dpj" == "%%j" (
set IISExpressPath=%%j
))))))
if "%IISExpressPath%" == "" (
for /F "usebackq tokens=1,2,*" %%h in (`reg query "HKLM\SOFTWARE\Wow6432Node\Microsoft\IISExpress" /s ^| findstr -i "InstallPath"`) do (
if /I "%%h" == "InstallPath" (
if /I "%%i" == "REG_SZ" (
if not "%%j" == "" (
if "%%~dpj" == "%%j" (
set IISExpressPath=%%j
))))))
if "%PersonalDocumentFolder%" == "" (
for /F "usebackq tokens=2*" %%i in (`reg query "HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v Personal`) do (
set PersonalDocumentFolder=%%j
))
if "%IISExpressManifest%" == "" (
for /F "usebackq tokens=1,2,*" %%h in (`reg query "HKLM\SOFTWARE\Microsoft\IISExpress" /s ^| findstr -i "Manifest"`) do (
if /I "%%h" == "Manifest" (
if /I "%%i" == "REG_SZ" (
if not "%%j" == "" (
set IISExpressManifest=%%j
)))))
if "%IISExpressManifest%" == "" (
for /F "usebackq tokens=1,2,*" %%h in (`reg query "HKLM\SOFTWARE\Wow6432Node\Microsoft\IISExpress" /s ^| findstr -i "Manifest"`) do (
if /I "%%h" == "Manifest" (
if /I "%%i" == "REG_SZ" (
if not "%%j" == "" (
set IISExpressManifest=%%j
)))))
set IISExpressUserProfileDirectory="%PersonalDocumentFolder%\IISExpress\config"
@rem ---------------------------------------------
@rem ---------------------------------------------
goto :eof
@rem ---------------------------------------------------------------------------------
@rem CheckParameterFile -- check if the package's setparamters.xml exists or not
@rem ---------------------------------------------------------------------------------
:CheckParameterFile
if exist "%_DeploySetParametersFile%" (
echo SetParameters from:
echo "%_DeploySetParametersFile%"
echo You can change IIS Application Name, Physical path, connectionString
echo or other deploy parameters in the above file.
) else (
echo SetParamterFiles does not exist in package location.
echo Use package embedded defaultValue to deploy.
)
echo -------------------------------------------------------
goto :eof
@rem ---------------------------------------------------------------------------------
@rem Usage
@rem ---------------------------------------------------------------------------------
:usage
echo =========================================================
if not exist "%RootPath%DataUploader.deploy-readme.txt" (
echo Usage:%~nx0 [/T^|/Y] [/M:ComputerName] [/U:userName] [/P:password] [/G:tempAgent] [additional msdeploy flags ...]
echo Required flags:
echo /T Calls msdeploy.exe with the "-whatif" flag, which simulates deployment.
echo /Y Calls msdeploy.exe without the "-whatif" flag, which deploys the package to the current machine or destination server
echo Optional flags:
echo. By Default, this script deploy to the current machine where this script is invoked which will use current user credential without tempAgent.
echo. Only pass these arguments when in advance scenario.
echo /M: Msdeploy destination name of remote computer or proxy-URL. Default is local.
echo /U: Msdeploy destination user name.
echo /P: Msdeploy destination password.
echo /G: Msdeploy destination tempAgent. True or False. Default is false.
echo /A: specifies the type of authentication to be used. The possible values are NTLM and Basic. If the wmsvc provider setting is specified, the default authentication type is Basic
otherwise, the default authentication type is NTLM.
echo /L: Deploy to Local IISExpress User Instance.
echo.[additional msdeploy flags]: note: " is required for passing = through command line.
echo "-skip:objectName=setAcl" "-skip:objectName=dbFullSql"
echo.Alternative environment variable _MsDeployAdditionalFlags is also honored.
echo.
echo. Please make sure MSDeploy is installed in the box http://go.microsoft.com/?linkid=9278654
echo.
echo In addition, you can change IIS Application Name, Physical path,
echo connectionString and other deploy parameters in the following file:
echo "%_DeploySetParametersFile%"
echo.
echo For more information about this batch file, visit http://go.microsoft.com/fwlink/?LinkID=183544
) else (
start notepad "%RootPath%DataUploader.deploy-readme.txt"
)
echo =========================================================
goto :eof
ReleaseClienti/DataUploader.zip
BIN
View File
Binary file not shown.
ReleaseClienti/DataUploader/Default.aspx
+30
View File
@@ -0,0 +1,30 @@
<%@ Page Language="C#" AutoEventWireup="true" CodeBehind="Default.aspx.cs" Inherits="DataUploader.Default" %>
<!DOCTYPE html>
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title></title>
</head>
<body>
<form id="form1" runat="server">
<div>
<img src="images/LogoSteamware.png" alt="Steamware" style="float:right;" />
<h1>WebSCR DataUploader</h1>
<i>Pagina di riferimento per progetto upload dati da Sigla++ Trony Rigamonti a WebSCR@steamware</i>
<br />
<br />
<%--Per effettuare test utilizzare la <a href="DemoPage.aspx">Demo Page</a>
<br />--%>
Per l'uso in produzione / continuativo vanno richiamate
<ul>
<li>periodicamente la pagina di <b>FullSync</b></li>
<li>su richiesta utente la pagina di <b>SyncDoc</b></li>
</ul>
<div style="border-top: 1px solid #696969; text-align: right; margin-top: 40px;">
@2015-<%: DateTime.Now.Year %> Steamware
</div>
</div>
</form>
</body>
</html>
ReleaseClienti/DataUploader/DemoPage.aspx
+47
View File
@@ -0,0 +1,47 @@
<%@ Page Language="C#" AutoEventWireup="true" CodeBehind="DemoPage.aspx.cs" Inherits="DataUploader.DemoPage" %>
<!DOCTYPE html>
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title></title>
</head>
<body>
<form id="form1" runat="server">
<div>
<h1>DemoPage</h1>
In questa pagina è riassunt la logica di chiamata delle altre pagine ed il funzionamento.
<br />
<hr />
<br />
<h2>FullSync</h2>
Questa è la pagina da chiamare periodicamente (esecuzione automatica?) in modo da effettuare il sync periodico dei dati da sigla ad online.
<br />
Il ciclo prevede i seguenti step:
<ul>
<li>Chiamata a sito remoto x avere codice dell'ultimo doc caricato (NUMERO univoco)</li>
<li>Chiamata a server DB2 locale x avere TUTTI i documenti "successivi"</li>
<li>Chiamata di invio dati per ogni documento non ancora caricato (e per ogni cliente per update)</li>
</ul>
il tutto viene fatto tramite la classe helper GestData
<br />
Demo: <a href="FullSync.aspx">FullSync.aspx</a>
<br />
<hr />
<br />
<h2>SyncDoc</h2>
Questa è la pagina da chiamare SU RICHIESTA UTENTE in modo da effettuare il sync PUNTUALE dei dati da sigla ad online per uno specifico documento.
<br />
Il ciclo prevede i seguenti step:
<ul>
<li>La pagina riceve un parametro del codice documento richiesto (TIPOPROTOC = OC/DC + NUMPROTOC incrementale annuale)</li>
<li>Chiamata a server DB2 locale x avere dati del documento</li>
<li>Chiamata di invio dati per documento e per il cliente correlato</li>
</ul>
il tutto viene fatto tramite la classe helper GestData
<br />
Demo: <a href="SyncDoc.aspx?DOC=OC0001616&Anno=2015">SyncDoc.aspx?DOC=OC0001616&Anno=2015</a>
</div>
</form>
</body>
</html>
ReleaseClienti/DataUploader/FullSync.aspx
+24
View File
@@ -0,0 +1,24 @@
<%@ Page Language="C#" AutoEventWireup="true" CodeBehind="FullSync.aspx.cs" Inherits="DataUploader.FullSync" %>
<!DOCTYPE html>
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title></title>
</head>
<body>
<form id="form1" runat="server">
<div>
<h1>FullSync</h1>
Modalità chiamata:
<ul>
<li>Senza parametri: effettua tutte le chiamate remote</li>
<li>Con aggiunto il parametro "?DemoMode=true" nell'url --> NON viene chiamata (per ogni record) la pagina remota ma viene mostrato l'elenco delle chiamate che SI SAREBBERO EFFETTUATE</li>
</ul>
<hr />
<h2>OUTPUT</h2>
<asp:Label runat="server" ID="lblOut" />
</div>
</form>
</body>
</html>
ReleaseClienti/DataUploader/SyncDoc.aspx
+24
View File
@@ -0,0 +1,24 @@
<%@ Page Language="C#" AutoEventWireup="true" CodeBehind="SyncDoc.aspx.cs" Inherits="DataUploader.SyncDoc" %>
<!DOCTYPE html>
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title></title>
</head>
<body>
<form id="form1" runat="server">
<div>
<h1>SyncDoc</h1>
<%--Modalità chiamata: è SEMPRE necessario nell'URL il numero del documento e l'anno! ?DOC=OC0001616&Anno=2015
<ul>
<li>Senza parametri: effettua tutte le chiamate remote</li>
<li>Con aggiunto il parametro "?DemoMode=true" nell'url --> NON viene chiamata (per ogni record) la pagina remota ma viene mostrato l'elenco delle chiamate che SI SAREBBERO EFFETTUATE</li>
</ul>
<hr />
<h2>OUTPUT</h2>--%>
<asp:Label runat="server" ID="lblOut" />
</div>
</form>
</body>
</html>
ReleaseClienti/DataUploader/Web.config
+38
View File
@@ -0,0 +1,38 @@
<?xml version="1.0" encoding="utf-8"?>
<configuration>
<appSettings>
<!--parametri base-->
<add key="maxDocsToUpload" value="2" />
<add key="remoteDocUrl" value="http://webscr.steamware.net/Rigamonti/Upload/Document" />
<add key="remoteCliUrl" value="http://webscr.steamware.net/Rigamonti/Upload/Client" />
<add key="debugMode" value="true" />
<!--connessione su un MDB di cui esiste un DSN-->
<!--<add key="connString" value="Dsn=DB_Sigla32;Initial Catalog=TESDOCUM;" />-->
<!--funziona se esiste un DSN DITTA1-->
<!--<add key="connString" value="Dsn=DITTA1;Uid=DB2;Pwd=ccL21x$1wow;Initial Catalog=TESDOCUM;" />-->
<!--funziona anche senza DSN esistente-->
<add key="connString" value="Driver={IBM DB2 ODBC DRIVER};DataBase=DITTA1; HostName=RigaSRV02; Protocol=TCPIP;Port=50000;Uid=DB2;Pwd=ccL21x$1wow" />
</appSettings>
<system.web>
<compilation targetFramework="4.5" />
<httpRuntime targetFramework="4.5" />
</system.web>
<runtime>
<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
<dependentAssembly>
<assemblyIdentity name="NLog" publicKeyToken="5120e14c03d0593c" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-4.0.0.0" newVersion="4.0.0.0" />
</dependentAssembly>
</assemblyBinding>
</runtime>
</configuration>
ReleaseClienti/DataUploader/bin/DataUploader.dll
BIN
View File
Binary file not shown.
ReleaseClienti/DataUploader/bin/NLog.Web.dll
BIN
View File
Binary file not shown.
ReleaseClienti/DataUploader/bin/NLog.config
+22
View File
@@ -0,0 +1,22 @@
<?xml version="1.0" encoding="utf-8" ?>
<nlog xmlns="http://www.nlog-project.org/schemas/NLog.xsd" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<targets>
<!-- file target -->
<target xsi:type="File" name="f" fileName="${basedir}/logs/${shortdate}.log"
layout="${longdate} [${uppercase:${level}}] ${message}" archiveEvery="Day" />
<!--viewer interattivo sentinel... http://sentinel.codeplex.com/-->
<target xsi:type="NLogViewer" name="sentinel" address="udp://127.0.0.1:9999"/>
<!--
<target xsi:type="File" name="f" fileName="${basedir}/logs/${shortdate}.log"
layout="${longdate} ${uppercase:${level}} ${message}" />
-->
</targets>
<rules>
<!-- logging rules -->
<logger name="*" minlevel="Trace" writeTo="f" />
<!--<logger name="*" minlevel="Trace" writeTo="sentinel" />-->
</rules>
</nlog>
ReleaseClienti/DataUploader/bin/NLog.dll
BIN
View File
Binary file not shown.
ReleaseClienti/DataUploader/favicon.ico
BIN
View File
Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 273 KiB

ReleaseClienti/DataUploader/images/LogoSteamware.png
BIN
View File
Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 4.1 KiB

ReleaseClienti/DataUploader/logs/PlaceHolder.file
+1
View File
@@ -0,0 +1 @@

ReleaseClienti/DataUploader/packages.config
+7
View File
@@ -0,0 +1,7 @@
<?xml version="1.0" encoding="utf-8"?>
<packages>
<package id="NLog" version="4.0.0" targetFramework="net45" />
<package id="NLog.Config" version="4.0.0" targetFramework="net45" />
<package id="NLog.Schema" version="4.0.0" targetFramework="net45" />
<package id="NLog.Web" version="2.0.0.0" targetFramework="net45" />
</packages>
WebSCR.v11.suo
BIN
View File
Binary file not shown.
WebSCR/Upload/Document.aspx.cs
+12
View File
@@ -22,6 +22,10 @@ namespace WebSCR.Upload
}
protected void Page_Load(object sender, EventArgs e)
{
if (memLayer.ML.confReadInt("_logLevel") > 6)
{
logger.lg.scriviLog("Inizio caricamento documento");
}
string answ = "ND";
/*
* http://webscr.steamware.net/Rigamonti/Upload/Document?TIPOPROTOC=OC&NUMERO=000000&ESERPROTOC=2015&NUMEPROTOC=000000&DATAPROTOC=20150521&ESERRIFERI=&NUMERIFERI=&TIPORIFERI=&DATARIFERI=&NUMEDOCRIF=&DATADOCRIF=&ESERCOLLEG=&CLI_FOR=C000000&DESTINATAR=C000000&RGSOC_DEST=SE+CI+FOSSE&INDIR_DEST=OPZIONALE&LOCAL_DEST=OPZIONALE&CAP_DEST=OPZIONALE&ULT_AGG=20150521
@@ -86,6 +90,10 @@ namespace WebSCR.Upload
// ora processo UPSERT...
DtProxy.man.taDocs.upsert(TIPOPROTOC, NUMERO, ESERPROTOC, NUMEPROTOC, DATAPROTOC, ESERRIFERI, NUMERIFERI, TIPORIFERI, DATARIFERI, NUMEDOCRIF, DATADOCRIF, ESERCOLLEG, CLI_FOR, DESTINATAR, RGSOC_DEST, INDIR_DEST, LOCAL_DEST, CAP_DEST, ULT_AGG, ANNOTAZION);
answ = "OK"; // registro in risposta che è andato tutto bene...
if (memLayer.ML.confReadInt("_logLevel") > 6)
{
logger.lg.scriviLog("Completato merge documento");
}
}
catch (Exception exc)
{
@@ -129,6 +137,10 @@ namespace WebSCR.Upload
Response.Clear();
Response.Write(answ);
Context.Response.End();
if (memLayer.ML.confReadInt("_logLevel") > 6)
{
logger.lg.scriviLog("Completato invio HTML");
}
}
}
}
WebSCR/bin/SteamWare.dll
BIN
View File
Binary file not shown.
WebSCR/bin/WebSCR.dll
BIN
View File
Binary file not shown.
WebSCR_data/bin/Release/SteamWare.dll
BIN
View File
Binary file not shown.
WebSCR_data/obj/Release/WebSCR_data.csprojResolveAssemblyReference.cache
BIN
View File
Binary file not shown.