Fiskalübersicht- Check Website
This commit is contained in:
@@ -932,7 +932,7 @@ Public Class usrcntlFiskaluebersicht
|
||||
|
||||
If Not checkWebsite(txtHomepage.Text) Then Exit Sub
|
||||
|
||||
Dim pdf = VERAG_PROG_ALLGEMEIN.cFormularManager.getPDFViaSpirePDF_FromURL(url) 'UU langsam....
|
||||
Dim pdf = VERAG_PROG_ALLGEMEIN.cFormularManager.getPDFViaSpirePDF_FromURL(txtHomepage.Text) 'UU langsam....
|
||||
|
||||
DS = New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "FISKALKUNDENANHAENGE", fk.FK_Datum, "", "", "Website", kdNr)
|
||||
Dim fi As New System.IO.FileInfo(pdf)
|
||||
@@ -951,7 +951,7 @@ Public Class usrcntlFiskaluebersicht
|
||||
' fk.FK_Homepage_PDF = DS.da_id
|
||||
'End If
|
||||
|
||||
fk.FK_Website_URL = url
|
||||
fk.FK_Website_URL = txtHomepage.Text
|
||||
fk.SAVE()
|
||||
|
||||
If Not cbxHomepage.Checked Then cbxHomepage.Checked = True
|
||||
@@ -1122,7 +1122,7 @@ Public Class usrcntlFiskaluebersicht
|
||||
|
||||
If Not checkWebsite(txtWebsiteSt.Text) Then Exit Sub
|
||||
|
||||
Dim pdf = VERAG_PROG_ALLGEMEIN.cFormularManager.getPDFViaSpirePDF_FromURL(url) 'UU langsam....
|
||||
Dim pdf = VERAG_PROG_ALLGEMEIN.cFormularManager.getPDFViaSpirePDF_FromURL(txtWebsiteSt.Text) 'UU langsam....
|
||||
|
||||
DS = New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "FISKALKUNDENANHAENGE", fk.FK_Datum, "", "", "Website-Steuerberater", kdNr)
|
||||
Dim fi As New System.IO.FileInfo(pdf)
|
||||
@@ -1138,7 +1138,7 @@ Public Class usrcntlFiskaluebersicht
|
||||
ANH.SAVE()
|
||||
|
||||
|
||||
fk.FK_WebsiteSt_URL = url
|
||||
fk.FK_WebsiteSt_URL = txtWebsiteSt.Text
|
||||
fk.SAVE()
|
||||
|
||||
initDGVUnterlagen()
|
||||
|
||||
Reference in New Issue
Block a user