Digory
12-03-2002, 02:00 PM
I've created a page that will allow you to syntax highlight posts in the following languages:
- Javascript
- VB.NET
- C#
- TSql
- VBScript
You can view the page here:
http://www.markitup.com/Forum/WebDeveloper.asp
Samples:
-----------
Javascript
var timeoutCookie;
var menuPopupCookie;
function menuOver(id)
{
var menuX = (event.clientX - (event.x + 2)) + document.body.scrollLeft;
var menuY = (event.clientY - event.y) + document.body.scrollTop + 16;
event.srcElement.onmouseleave = menuPopCancel;
menuPopupCookie = window.setTimeout('menuPop(\'' + id + '\', ' + menuX + ', ' + menuY + ');', 1000);
}
VB.NET
' Allow users access to the title
Property Title() As Label
Get
Return TitleLabel
End Get
Set(ByVal Value As Label)
TitleLabel = Value
End Set
End Property
C#
using System;
namespace TestAttributes
{
/// <summary>
/// This class represents a user to the application.
/// </summary>
/// <remarks>
/// These comments are hidden from the stupid users
/// </remarks>
public class User
{
private string firstname ;
private string surname ;
TSql
SELECT @strIdentityColumnName = Name
FROM dbo.SysColumns SC
WHERE OBJECT_NAME (ID) = @vstrTableName
AND COLUMNPROPERTY (OBJECT_ID (@vstrTableName), Name, 'IsIdentity') = 1
IF COLUMNPROPERTY(OBJECT_ID(@vstrTableName), @strIdentityColumnName,'IsIdentity') = 1
BEGIN
SELECT @rintIdentityExist = 'Y'
END
Mark-up WebDeveloper posts here
http://www.markitup.com/Forum/WebDeveloper.asp
- Javascript
- VB.NET
- C#
- TSql
- VBScript
You can view the page here:
http://www.markitup.com/Forum/WebDeveloper.asp
Samples:
-----------
Javascript
var timeoutCookie;
var menuPopupCookie;
function menuOver(id)
{
var menuX = (event.clientX - (event.x + 2)) + document.body.scrollLeft;
var menuY = (event.clientY - event.y) + document.body.scrollTop + 16;
event.srcElement.onmouseleave = menuPopCancel;
menuPopupCookie = window.setTimeout('menuPop(\'' + id + '\', ' + menuX + ', ' + menuY + ');', 1000);
}
VB.NET
' Allow users access to the title
Property Title() As Label
Get
Return TitleLabel
End Get
Set(ByVal Value As Label)
TitleLabel = Value
End Set
End Property
C#
using System;
namespace TestAttributes
{
/// <summary>
/// This class represents a user to the application.
/// </summary>
/// <remarks>
/// These comments are hidden from the stupid users
/// </remarks>
public class User
{
private string firstname ;
private string surname ;
TSql
SELECT @strIdentityColumnName = Name
FROM dbo.SysColumns SC
WHERE OBJECT_NAME (ID) = @vstrTableName
AND COLUMNPROPERTY (OBJECT_ID (@vstrTableName), Name, 'IsIdentity') = 1
IF COLUMNPROPERTY(OBJECT_ID(@vstrTableName), @strIdentityColumnName,'IsIdentity') = 1
BEGIN
SELECT @rintIdentityExist = 'Y'
END
Mark-up WebDeveloper posts here
http://www.markitup.com/Forum/WebDeveloper.asp