- Open the rsreportserver.config(By default, it can be found from C:\Program Files\Microsoft SQL Server\MSRS10_50.MSSQLSERVER\Reporting Services\ReportServer)
- Comment the <RSWindowsNegotiate/> under <AuthenticationTypes> element.
Friday, November 18, 2016
SSRS Keeps prompting for username and password when trying to access the website
https://social.msdn.microsoft.com/Forums/sqlserver/en-US/9ef2f893-648b-46d3-9339-9fd06075570a/ssrs-prompting-for-usernamepassword-when-trying-to-access-the-report-installed-on-a-server-from?forum=sqlreportingservices
Wednesday, November 16, 2016
Dynamics NAV CAL - How to use Special Character ' in text string outputs
4 single quotes will turn into 1 single quote
Example
Message('''' + MyWord + '''');
will display 'MyWord'
Example
Message('''' + MyWord + '''');
will display 'MyWord'
Dynamics GP - Macro REM or Comment a line
You can just use the ' character at the beginning of lines to stop them from running
Also include this line at the beginning to suppress all error messages
logging file 'macro.log'
Also include this line at the beginning to suppress all error messages
logging file 'macro.log'
Monday, November 14, 2016
Dynamics GP - Customer Phone number does not print on SOP Invoice
- In the Customer address card drill into the address itself
- In the area for "Ship To", Print Phone/Fax Number
- select "Phone1"
Or use this script to set all customer addresses to "Phone1"
- update rm00102 set print_phone_numbergb = 1
- Neither of the above options will update existing SOP documents.
- After making the change on the address card, you must navigate to the sales document, reselect the ship to address id, and roll down the address changes for it to pick up the new address option.
Thursday, November 10, 2016
Dynamics GP - VBA cannot be initialized
Your dynamics GP Registration does not have Modifier enabled.
Check your keys and confirm the module is enabled.
Check your keys and confirm the module is enabled.
Dynamics GP - Modifier and VBA Visual Basic - ODBC Connection - GP2015 After 14.00.066
- Before starting, ensure you check this
- Tools > References > Check the checkbox in front of "Microsoft ActiveX Data Objects 2.5 Library"
'---------------------------------------------------------------------------------------------------
Option Explicit
Private Sub CheckAccounts_BeforeUserChanged(KeepFocus As Boolean, CancelLogic As Boolean)
Dim RetVal As String
On Error GoTo CheckAccounts_BeforeUserChanged_Err
Dim IntercompanyID As String
Dim SystemDatabase As String
Dim StockCountNumber As String
Dim GetNOAccountResult As String
'Retrieve and display the UserInfo
IntercompanyID = GETRunningUser("IntercompanyID")
SystemDatabase = GETRunningUser("SystemDatabaseName")
Exit Sub
Private Function GetNOAccount(ByVal coName As String, ByVal StockID As String) As String
Dim cn As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim cmd As New ADODB.Command
Dim SqlStr As String
On Error GoTo GetNOAccount_Err
'Retrieve an ADO connection for the current user
Set cn = UserInfoGet.CreateADOConnection()
'Set the connection properties
cn.CursorLocation = adUseClient
'Set the current database, using the IntercompanyID property
cn.DefaultDatabase = UserInfoGet.IntercompanyID
SqlStr = ""
'Create a command to select result
cmd.ActiveConnection = cn
cmd.CommandType = adCmdText
cmd.CommandText = SqlStr
Set rst = cmd.Execute
SqlStr = " select top 1 * from dbo.ResultFile"
cmd.CommandText = SqlStr
Set rst = cmd.Execute
'Display the rows retrieved
'rst![ColumnName]
' MsgBox ">>" + rst!ResultText
GetNOAccount = rst!ResultText
'Close the connection
cn.Close
Exit Function
GetNOAccount_Err:
Select Case Err.Number
Case 91
'Object variable or With block variable not set (Error 91)
MsgBox "Error 91:" + Str(Err.Number) + "<" + Err.Description + ">"
Resume
Case Else
MsgBox "Unknown Error:" + Str(Err.Number) + "<" + Err.Description + ">"
Exit Function
End Select
End Function
Private Function GETRunningUser(ByVal request As String) As String
Dim UserInfoObj As UserInfo
Dim CompanyName As String
Dim IntercompanyID As String
Dim SystemDatabase As String
Dim UserDate As Date
Dim UserID As String
Dim UserName As String
'Get the UserInfo object
Set UserInfoObj = VbaGlobal.UserInfoGet()
'Retrieve and display the UserInfo
Select Case request
Case "CompanyName"
GETRunningUser = UserInfoObj.CompanyName
Case "IntercompanyID"
GETRunningUser = UserInfoObj.IntercompanyID
Case "SystemDatabaseName"
GETRunningUser = UserInfoObj.SystemDatabaseName
Case "UserDate"
GETRunningUser = UserInfoObj.UserDate
Case "UserID"
GETRunningUser = UserInfoObj.UserID
Case "UserName"
GETRunningUser = UserInfoObj.UserName
Case Else
GETRunningUser = ""
End Select
End Function
'--------------------------------------------------------------------------------------------------------------------
Subscribe to:
Posts (Atom)