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

Änderungen Visual Styles

Browse Source
This commit is contained in:
ja
2021-08-02 16:05:42 +02:00
parent 56bb165322
commit e7a6b8a10f
9 changed files with 138 additions and 92 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
App_Code/cClasses.vb
View File

@@ -8,8 +8,6 @@ Public Class cNavigation
Property subnavigation As List(Of cNavigation) = Nothing
End Class
Public Class cBlock
Property block_ID As Integer = -1
Property block_order As Integer = -1

5
App_Code/cDBFunctions.vb
View File

@@ -12,9 +12,10 @@ Public Class cDBFunctions
Dim cn As New SqlConnection()
' cn.ConnectionString = "Server=db593295684.db.1and1.com;Database=db593295684;Uid=dbo593295684;Pwd=atilla#2;"
If HttpContext.Current.Request.ServerVariables("SERVER_NAME") = "localhost" Then
cn.ConnectionString = "Server=FMZOLL\SQLFMZOLL;Database=VERAG_HOMEPAGE;Uid=sa;Pwd=BmWr501956"
cn.ConnectionString = "Server=FMZOLL.verag.ost.dmn\SQLFMZOLL;Database=VERAG_HOMEPAGE;Uid=AppUser;Pwd=yp/THDd?xM+pZ$"
' cn.ConnectionString = "Server=FMZOLL\SQLFMZOLL;Database=VERAG_HOMEPAGE;Uid=sa;Pwd=BmWr501956"
Else
cn.ConnectionString = "Server=FMZOLL\SQLFMZOLL;Database=VERAG_HOMEPAGE;Uid=sa;Pwd=BmWr501956"
cn.ConnectionString = "Server=DEVELOPER.verag.ost.dmn\DEVSQL;Database=VERAG_HOMEPAGE;Uid=AppUser;Pwd=yp/THDd?xM+pZ$;"
' cn.ConnectionString = "Server=db593295684.db.1and1.com;Database=db593295684;Uid=dbo593295684;Pwd=atilla#2;"
End If
cn.Open()