edv/ADMIN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

creditsafe-api

Browse Source
This commit is contained in:
d.breimaier
2025-09-29 16:49:46 +02:00
parent 4b248b9aee
commit 0f4aad9a21
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
initATLASAufschubkonten/frmStartOptions.vb
View File

@@ -851,6 +851,9 @@ Public Class frmStartOptions
Dim sendMail As Boolean = True Dim sendMail As Boolean = True
importCreditsafeEvents(CDate(Today().AddDays(-1)).ToShortDateString, checkDate, upateKunden, setzeInfoImKunden, sendMail, False) importCreditsafeEvents(CDate(Today().AddDays(-1)).ToShortDateString, checkDate, upateKunden, setzeInfoImKunden, sendMail, False)
closeMe() closeMe()
Case "CREDITSAFE_UPLOADS" Case "CREDITSAFE_UPLOADS"
@@ -6429,8 +6432,8 @@ weiter:
Dim dtMonitoredRequest As New DataTable Dim dtMonitoredRequest As New DataTable
Dim companyDummy As New cCreditSafeAPI.Company("", "", "", "", "", "", Nothing, "", "", "", "", "", "", "", "", "", 0) Dim companyDummy As New cCreditSafeAPI.Company("", "", "", "", "", "", Nothing, "", "", "", "", "", "", "", "", "", 0)
If txtCSDate.Text <> "" AndAlso IsDate(txtCSDate.Text) Then If datum <> "" AndAlso IsDate(datum) Then
companyDummy.lastChecked = CDate(txtCSDate.Text) companyDummy.lastChecked = CDate(datum)
End If End If
repeatRequestDaily: repeatRequestDaily:
Dim page As Integer = 0 Dim page As Integer = 0