[jibi]

I would think it would be simple enough to write something into the ASP script for an If/Then/Else replace statement to handle the number conversions, no? Of course, my coding clases aren't really coming back to me all that much these days... heh.

[jibi]

I compressed your screenshot and emailed it to you. 7MB is a wee bit too big for most people

[Grimlin]

Originally Posted by jibi

I would think it would be simple enough to write something into the ASP script for an If/Then/Else replace statement to handle the number conversions, no? Of course, my coding clases aren't really coming back to me all that much these days... heh.

You are correct. I just hate customizing that asp page. It was written to be generic and work with any view or table regardless of the columns or content. I'll post the the code snippet for the change if you want / need. You can just fill out the Case statement with the values as we find them. The anal retentive side of me that likes the generic ASP is going into convulsive fits as I type...

[Grimlin]

The real question is is anyone running a resolution that allows them to view it full size without scrolling?

I tried to compress the jpg to get it small enough to attach to the post, but had no luck even at the lowest setting. So when I gave up and dropped it on my site, I decided to use high quality. I'll post one for the bandwidth challenged users later.

[jibi]

Quick favor though, and on a related note as the above status conversions, since I know nothing of ASP. Can you pull the stat for the BlackBerry instance name, dbo.UserConfig.ServerConfigId and have it convert the value (1, 2, etc) to a static entry inputted by the user (obviously, they'd have to edit the ASP code for these values)?

So if there were users on BESPROD1 with ServerConfigId of 1, and users on BESPROD2 with ServerConfigId of 2, then the display on the page would read BESPROD1 or BESPROD2 and not 1 or 2.

I have one of our web developers looking at it in his spare time, but in case he never gets around to it, and if its something you could possibly do...

[Grimlin]

Wirelessly posted (BlackBerry7290/4.0.0 Profile/MIDP-2.0 Configuration/CLDC-1.1)

Will post the code snippet tonight. I'm on Berry, driving and listening to a podcast so coding would be pushing it.

[jibi]

haha. I got it, but see if you can do anything better (hehe). He changed this (places it in the second column, or perhaps its wherever its designated within the view?).

Be sure the view includes dbo.UserConfig.ServerConfigId within the initial column designation string.

						<TR>
			<%For COL = 0 to UBound(COLS,2)%>
				<%If ROW > 0 Then	'Set up TD coloring for odd numered rows
					If ROW/2 = Int(ROW/2) Then 'Even, don't color %>
						<TD Align="Left">
					<%Else%>
						<TD BGCOLOR="#C0C0C0" Align="Left">
					<%End If%>
				<%Else%>
						<TD Align="Left">
				<%End If%>
						<%
							If IsNull(Data(COL,ROW)) or Trim(Data(COL,ROW)) = "" Then
								Response.Write("&nbsp")
							ElseIF Trim(COLS(0,COL)) = "Server" and Trim(Data(COL,ROW)) = "1" Then
								Response.Write("<A Href='lite.asp?Server=1'>SERVER1</A>")
							ElseIF Trim(COLS(0,COL)) = "Server" and Trim(Data(COL,ROW)) = "2" Then
								Response.Write("<A Href='lite.asp?Server=2'>SERVER2</A>")
							Else							
								Response.Write("<A Href='lite.asp?" & COLS(0,COL) & "=" & Data(COL,ROW) & "'>" & Data(COL,ROW) & "</A>")
							End If
						%>

						</TD>
			<%Next%>
						</TR>
		<%Next%>

[jibi]

and this for lite.asp:

						<%
							If 

IsNull(Data(COL,ROW)) or Trim(Data(COL,ROW)) = "" Then
								

Response.Write(COLS(0,COL) & ":<BR>")
							ElseIF 

Trim(COLS(0,COL)) = "Server" and Trim(Data(COL,ROW)) = "1" Then
								

Response.Write(("Server: SERVER1") & "<BR>")
							ElseIF 

Trim(COLS(0,COL)) = "Server" and Trim(Data(COL,ROW)) = "2" Then
								

Response.Write(("Server: SERVER2") & "<BR>")
							Else
								

Response.Write(COLS(0,COL) & ": " & Data(COL,ROW) & "<BR>")
							End If
						%>

[Grimlin]

I was in the process of rewriting it when I went out and looked at what you are talking about. I will finish the code so that we can use it as a custom lookup for the status that isn't in the database. However, for this one, why not just change the SQL view to include the Server config table? Like this:

SELECT     SUBSTRING(CONVERT(nchar(100), UserConfig.ServerDN), 54, 3) AS Site, ServerConfig.ServiceName, UserConfig.DisplayName, UserConfig.PIN, 
                      SyncDeviceMgmtSummary.ModelName, SyncDeviceMgmtSummary.HomeNetwork AS LastNetwork, UserStats.MsgsPending AS Pending, 
                      UserStats.MsgsForwarded AS Rcvd, UserStats.MsgsSent AS Sent, UserStats.MsgsExpired AS Expired, UserStats.MsgsFiltered AS Filtered, 
                      RTRIM(CONVERT(nchar(10), DATEDIFF(hh, UserStats.LastFwdTime, GETUTCDATE()) / 24)) + ' Days' + ' ' + RTRIM(CONVERT(nchar(10), DATEDIFF(mi, 
                      UserStats.LastFwdTime, GETUTCDATE()) / 60 - DATEDIFF(hh, UserStats.LastFwdTime, GETUTCDATE()) / 24 * 24)) + ' hrs' AS Inactive, DATEADD(hh, 
                      DATEDIFF(hh, GETUTCDATE(), GETDATE()), UserStats.LastFwdTime) AS LastRcvd, DATEADD(hh, DATEDIFF(hh, GETUTCDATE(), GETDATE()), 
                      UserStats.LastSentTime) AS LastSent, UserConfig.MailboxSMTPAddr AS SMTP, SUBSTRING(CONVERT(nchar(100), UserConfig.ServerDN), 51, 10) 
                      AS ExchServer, SyncDeviceMgmtSummary.AppsVer, SyncDeviceMgmtSummary.PhoneNumber, SyncDeviceMgmtSummary.DCID, 
                      SyncDeviceMgmtSummary.IMEI, SyncDeviceMgmtSummary.ITPolicyName, SyncDeviceMgmtSummary.FlashSize / 1048576 AS Memory, DATEADD(hh, 
                      DATEDIFF(hh, GETUTCDATE(), GETDATE()), UserConfig.CreationTime) AS Creation, DATEADD(hh, DATEDIFF(hh, GETUTCDATE(), GETDATE()), 
                      UserConfig.ActivationTime) AS Activation, DATEADD(hh, DATEDIFF(hh, GETUTCDATE(), GETDATE()), UserConfig.KeyDate) AS KeyGen, DATEADD(hh, 
                      DATEDIFF(hh, GETUTCDATE(), GETDATE()), SyncDeviceMgmtSummary.HandheldConfigCheckTime) AS LastUpdate
FROM         ServerConfig RIGHT OUTER JOIN
                      UserConfig ON ServerConfig.Id = UserConfig.ServerConfigId LEFT OUTER JOIN
                      UserStats ON UserConfig.Id = UserStats.UserConfigId LEFT OUTER JOIN
                      SyncDeviceMgmtSummary ON UserConfig.Id = SyncDeviceMgmtSummary.UserConfigId

[Grimlin]

Ok, I recoded it. I don't like it as it makes the ASP a bit messy, but it does extend the functionality without making us create a new lookup table in the BES database. You can now create a Case statement for a fieldname and create your own replacement values in the code. The ugly part is you have to do it in both pages. I probably could write it into an #include and another file that they share, but not tonight.

http://www.thegrims.com/berrystats/Berrystats.zip

[jibi]

hehe, thanks very much good sir.

p.s-its ASP code - how could you ever make it messy

[Grimlin]

Originally Posted by jibi

hehe, thanks very much good sir.

p.s-its ASP code - how could you ever make it messy

Actually I was referring to the fact that it UNGenerecizes (I made a new word!!!) that page. ...but I just got drunk and started coding so it all worked out...

Let me know if I screwed anything up. I forgot to keep in the part I made for you about the BES Server name. You'll have to get the SQL from the post above.

[jibi]

haha. not a prob. thanks again for your hard work!

[cayzac]

Am I doing something wrong here? I can't get to the server.

[Grimlin]

Originally Posted by cayzac

Am I doing something wrong here? I can't get to the server.

My server? Yeah... I forgot to pay up this year and my Domain got bumped from DNS. I payed today and all should be back between now and tomorrow. Sorry. In the meantime if you just really want it, email me at and I'll send it to you via email.

[cayzac]

OK, I've got the code now. I'm using a simple Blackberry server setup, still using MSDE. By default its using Windows Authentication. The code seems to be connecting to the database using SQL Authentication. I'm not a SQL guru but I've tried making a connection but keep getting errors. What should the connection string look like in my case? Thanks!

[jibi]

Do you have TCP/IP enabled for the MSDE database? Go to Start then Run and type in SVRNETCN. Enable it if its not.

[Grimlin]

Originally Posted by cayzac

By default its using Windows Authentication. The code seems to be connecting to the database using SQL Authentication.

You'll need to convert it to accept SQL auth. You can do this through Enterprise manager. If you can get to it, look here http://www.thegrims.com/berrystats I have some brief instructions.

If you want to maintain windows auth for this, your web server will have to be a domain controller. If not, the MS double hop authentication restriction will kick in and you won't be able to authenticate to the database.

***EDIT***
OK, really brief. I'll get more in depth later. for now:
Right Click on your BES instance
Click properties
Go to security tab
Select SQL Server and Windows
Click OK

Expand out the tree structure.
Go to Security and the Logins
RightClick logins...New Login
Key in a name
Change to SQL Auth
Key in a password
Go to Database Access
Check BESMgmt
Check Datareader
OK

Done

[cayzac]

It was not enabled, I enabled it and now I'm getting:
ADODB.Recordset (0x800A0BCD)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/berrystats/index.asp, line 33

Line 33 is "COLS = RS.GetRows(1000)"

Any ideas? I appreciate the help.

[Grimlin]

Originally Posted by cayzac

It was not enabled, I enabled it and now I'm getting:
ADODB.Recordset (0x800A0BCD)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/berrystats/index.asp, line 33

Line 33 is "COLS = RS.GetRows(1000)"

Any ideas? I appreciate the help.

What happens when you run the view from enterprise manager?