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

Packst.

Browse Source
This commit is contained in:
Andreas Luxbauer
2026-02-02 08:51:25 +01:00
parent 2304bf098b
commit fa42cca191
3 changed files with 12 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
initATLASAufschubkonten/cBuergschaften.vb
View File

@@ -15,11 +15,12 @@ Public Class cBuergschaften
Return cn
End Function
Public Shared Function GetNewOpenConnectionFMZOLL() As SqlConnection
Dim cn As New SqlConnection()
cn.ConnectionString = "Data Source=FMZOLL\SQLFMZOLL;Initial Catalog=VERAG;Integrated Security=false;User ID=AppUser;Password=yp/THDd?xM+pZ$;"
' cn.ConnectionString = "Data Source=DEVELOPER\DEVSQL;Initial Catalog=VERAG;Integrated Security=false;User ID=AppUser;Password=yp/THDd?xM+pZ$;"
cn.Open()
Return cn
Return (VERAG_PROG_ALLGEMEIN.SQL).GetNewOpenConnectionFMZOLL()
'Dim cn As New SqlConnection()
'cn.ConnectionString = "Data Source=FMZOLL\SQLFMZOLL;Initial Catalog=VERAG;Integrated Security=false;User ID=AppUser;Password=yp/THDd?xM+pZ$;"
'' cn.ConnectionString = "Data Source=DEVELOPER\DEVSQL;Initial Catalog=VERAG;Integrated Security=false;User ID=AppUser;Password=yp/THDd?xM+pZ$;"
'cn.Open()
'Return cn
End Function
Public Shared Function GetNewOpenConnectionBUCHHALTUNG() As SqlConnection
Dim cn As New SqlConnection()