Thursday, December 11, 2008

ECSHOP(ECSHOP是一款开源免费的网上商店系统)

http://www.ecshop.com/index.php

免费 + 开源 ECSHOP是一款开源免费的网上商店系统。由专业的开发团队升级维护,为您提供及时高效的技术支持,您还可以根据自己的商务特征对ECSHOP进行定制,增加自己商城的特色功能。

强大 + 简便 ECSHOP除了注重功能上的强大以外更重要的特点就是操作上的方便快捷。我们设身处地为用户着想的设计理念使我们的产品达到了极高的易用性。只需轻点鼠标+简单录入即可完成商城管理。

效率 + 速度 ECSHOP在系统架构,数据库,程序等方面的设计都由资深的专业人士完成,保证了系统的健壮和效率,高效合理的管理流程助您在瞬息万变的商务活动中始终领先一步,掌握市场的主动权。

Tuesday, December 2, 2008

phpBMS Project.

http://www.phpbms.org/
phpBMS Project.

phpBMS is web-based, open source, Business Management Software (BMS). The phpBMS package is based on the LAMP stack.

phpBMS is designed for small and mid-size enterprises looking for an integrated system to manage their business. A system that is capable of managing daily operations, creating and printing orders, tracking clients and prospects, and fulfilling accounts receivable needs.

Key Features

  • Simple Sales Order Entry
  • Recurring invoices
  • PDF Billing Documents
  • Client/Prospect Mass E-mailing
  • Accounts Recievable

Sunday, November 23, 2008

SmartMenus

http://www.smartmenus.org/
SmartMenus is one of the most advanced, highly cross-browser and simple-to-use DHTML menu / JavaScript menu (i.e. website menu) scripts available worldwide.

- Accessible to assistive technology
- Search engine friendly
- Section 508 compliant
- List-based markup
- Completely CSS driven
- Fully customizable menu styles
- Full support for RTL text (pages)
- All modern browsers fully supported
- Compact code, simple configuration

Sunday, November 16, 2008

CSS Scrollbar Scrolling Color

【捲軸設定】

CSS可用捲軸列設定值
名稱 說明 可能值 範例
scrollbar-base-color 捲軸列主色調 顏色 scrollbar-base-color:#aaaaaa
scrollbar-arrow-color 按鈕箭頭的顏色 顏色
 
scrollbar-arrow-color:#000000
scrollbar-face-color 移動棒的顏色 顏色 scrollbar-face-color:#ffee99
scrollbar-highlight-color 按鈕邊框內層左邊與上面的顏色及捲軸底部軌道網狀顏色(與track同時使用網狀會消失) 顏色 scrollbar-highlight-color: #000000
scrollbar-3dlight-color 按鈕邊框外層左邊與上面的顏色 顏色 scrollbar-3dlight-color:#000000
scrollbar-darkshadow-color 按鈕邊框外層右邊與下面的顏色 顏色 scrollbar-darkshadow-color:#000000
scrollbar-shadow-color 按鈕邊框內層右邊與下面的顏色 顏色 scrollbar-track-color: #cccccc
scrollbar-track-color 底部軌道顏色 顏色 scrollbar-track-color: #cccccc

Friday, October 17, 2008

Virtual Host of Apache - Name-based

在httpd.conf:
# Virtual hosts
Include conf/extra/httpd-vhosts.conf

在http-vhosts.conf:
#
# Use name-based virtual hosting.
#
NameVirtualHost *:80

#
# VirtualHost example:
# Almost any Apache directive may go into a VirtualHost container.
# The first VirtualHost section is used for all requests that do not
# match a ServerName or ServerAlias in any block.
#

DocumentRoot C:/xammp/htdocs/



DocumentRoot C:/xammp/htdocs/xxx_directory
ServerName www.winixhk.com

Monday, September 15, 2008

Return The Last Repeated Record

If the records are repeated, then the late repeated record will be reported only.

Sub distinct_value_lower()

Dim pointers As String
pointers = Range("a1").Value
'Debug.Print "1:" & pointers

For x = 2 To 36
If Range("A" & x).Value = pointers Then
pointers = Range("A" & x).Value
Else
Range("B" & x - 1).Value = pointers
pointers = Range("A" & x).Value
End If
Next
End Sub

Find email and copy to a separate cell

The following sub can help to copy the email in a row and paste to a separator. It is usefull when the email addresses occurred randomly in the Excel.

Sub Find_email()

For i = 2 To 2357
Range("A" & i, "AS" & i).Select
Cells.Find(What:="@", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, MatchByte:=False, SearchFormat:=False).Select

Selection.Copy
Range("AT" & i).Select
ActiveSheet.Paste
Next

End Sub

Monday, September 1, 2008

Grab Data Using Excel

Dim a(3)
a(0) = "http://www.jewellery-hk.org/big5/cfullmember.php?eng_coname=A-1%20Jewelry%20Manufactory%20Limited"
a(1) = "http://www.jewellery-hk.org/big5/cfullmember.php?eng_coname=Aaron%20Shum%20Jewelry%20Limited"
a(2) = "http://www.jewellery-hk.org/big5/cfullmember.php?eng_coname=Abba%20Jewellery%20%28Mfg%29%20Limited"

Dim i As Integer
Dim x As Integer
x = 1
For i = 0 To 3

With ActiveSheet.QueryTables.Add(Connection:= _
"URL;" & a(i) & "" _
, Destination:=Range("A" & x))
.Name = "Jewellery" & i
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "8"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=Ture
End With

x = x + 12
Next

Data Horizontal to Vertical

Dim x As Integer
x = 1

For i = 1 To 2748

'Range("B1:B12").Select
rangeA = "B" & i
rangeB = "B" & i + 11
Range(rangeA, rangeB).Select
Selection.Copy
Range("D" & x).Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=True

i = i + 11
x = x + 1
Next
End Sub

HTML to ASCII Code

http://onlinetools.org/tools/htmlizerdata/index.php

VBscript While Loop

i=0

do while i < 10

document.write(i & "<br />")

i=i+1

loop

VBscript Foreach Loop

dim names(2)
names(0) = "Tove"
names(1) = "Jani"
names(2) = "Hege"

for each x in names
document.write(x & "
")
next

VBscript For Loop

for i = 0 to 5
document.write("The number is " & i & "
")
next

VBscript Array

dim a
a=Array(5,10,15,20)
document.write(a(3))

Output:

20

================

Dim myArray(3)
myArray(0) = "Clean Underwear"
myArray(1) = "Vacuum Cleaner"
myArray(2) = "New Computer"
myArray(3) = "Talking Bass"
document.write(myArray(0))

Extract Hyperlink in Excel

EXTRACT HYPERLINK IN EXCEL



Function HyperLinkText(pRange As Range) As String

Dim ST1 As String
Dim ST2 As String
Dim LPath As String
Dim ST1Local As String

If pRange.Hyperlinks.Count = 0 Then
Exit Function
End If

LPath = ThisWorkbook.FullName

ST1 = pRange.Hyperlinks(1).Address
ST2 = pRange.Hyperlinks(1).SubAddress

If Mid(ST1, 1, 15) = "..\..\..\..\..\" Then
ST1Local = ReturnPath(LPath, 5) & Mid(ST1, 15)
ElseIf Mid(ST1, 1, 12) = "..\..\..\..\" Then
ST1Local = ReturnPath(LPath, 4) & Mid(ST1, 12)
ElseIf Mid(ST1, 1, 9) = "..\..\..\" Then
ST1Local = ReturnPath(LPath, 3) & Mid(ST1, 9)
ElseIf Mid(ST1, 1, 6) = "..\..\" Then
ST1Local = ReturnPath(LPath, 2) & Mid(ST1, 6)
ElseIf Mid(ST1, 1, 3) = "..\" Then
ST1Local = ReturnPath(LPath, 1) & Mid(ST1, 3)
Else
ST1Local = ST1
End If

If ST2 <> "" Then
ST1Local = "[" & ST1Local & "]" & ST2
End If

HyperLinkText = ST1Local

End Function

Function ReturnPath(pAppPath As String, pCount As Integer) As String

Dim LPos As Integer
Dim LTotal As Integer
Dim LLength As Integer

LTotal = 0
LLength = Len(pAppPath)

Do Until LTotal = pCount + 1
If Mid(pAppPath, LLength, 1) = "\" Then
LTotal = LTotal + 1
End If
LLength = LLength - 1
Loop

ReturnPath = Mid(pAppPath, 1, LLength)

End Function


USAGE :
=HyperLinkText(A1)

Friday, August 15, 2008

CodeCharge Studio 4.0

http://www.yessoftware.com/download/

Accelerate Web Development with professional Web Application Generator
(create dynamic Websites like this one with minimal coding)

Runtime Revolution Studio

http://newserver.runrev.com/products/revolution-studio/feature-tour/

Revolution Studio is the innovative development platform that lets you quickly create software to get the job done.

Build rich, web-enabled applications for multiple platforms with a single click. Harness the power of multi-user database systems. Manifest your goals, whatever they are, using a language that is quick to learn and easy to maintain.

http://en.wikipedia.org/wiki/List_of_Rapid_Application_Development_tools

Friday, May 30, 2008

MySQL Unicode Setting

mysql_query("SET NAMES 'UTF8'");
mysql_query("SET CHARACTER SET UTF8");
mysql_query("SET CHARACTER_SET_RESULTS=UTF8'");

Tuesday, April 15, 2008

&#xxxx; Conversion

mb_convert_encoding($row['cruiseNamechi'], "UTF-8", "HTML-ENTITIES");

Saturday, March 22, 2008

Gallery - Your Photos on Your Website

http://gallery.menalto.com/
Gallery, the open source web based photo album organizer.

Adobe Media Gallery

Adobe Media Gallery
http://stlab.adobe.com/amg/

Polaroid Gallery v.1.01

http://www.no3dfx.com/polaroid/

Polaroid Gallery is a free, opensource flash gallery developed by myself, Christopher Einarsrud, in the year of 2006.

Chart Linkages - Drawing Charts Instantly

Open Flash Chart
http://teethgrinder.co.uk/open-flash-chart/related.php

Sunday, March 9, 2008

How to Send Email from a PHP Script Using SMTP Authentication

http://email.about.com/od/emailprogrammingtips/qt/et073006.htm

Sending Mail from PHP Using SMTP Authentication - Example

<?php
require_once "Mail.php";

$from = "Sandra Sender <sender@example.com>";
$to = "Ramona Recipient <recipient@example.com>";
$subject = "Hi!";
$body = "Hi,\n\nHow are you?";

$host = "mail.example.com";
$username = "smtp_username";
$password = "smtp_password";

$headers = array ('From' => $from,
'To' => $to,
'Subject' => $subject);
$smtp = Mail::factory('smtp',
array ('host' => $host,
'auth' => true,
'username' => $username,
'password' => $password));

$mail = $smtp->send($to, $headers, $body);

if (PEAR::isError($mail)) {
echo("<p>" . $mail->getMessage() . "</p>");
} else {
echo("<p>Message successfully sent!</p>");
}
?>

Sending Mail from PHP Using SMTP Authentication and SSL Encryption - Example

<?php
require_once "Mail.php";

$from = "Sandra Sender <sender@example.com>";
$to = "Ramona Recipient <recipient@example.com>";
$subject = "Hi!";
$body = "Hi,\n\nHow are you?";

$host = "ssl://mail.example.com";
$port = "465";
$username = "smtp_username";
$password = "smtp_password";

$headers = array ('From' => $from,
'To' => $to,
'Subject' => $subject);
$smtp = Mail::factory('smtp',
array ('host' => $host,
'port' => $port,
'auth' => true,
'username' => $username,
'password' => $password));

$mail = $smtp->send($to, $headers, $body);

if (PEAR::isError($mail)) {
echo("<p>" . $mail->getMessage() . "</p>");
} else {
echo("<p>Message successfully sent!</p>");
}
?>

Monday, January 28, 2008

Blueprint CSS Framework

http://code.google.com/p/blueprintcss/

http://www.blueprintcss.org/

http://blueprintcss.org/media/BlueprintV0.8byGJMS.pdf

Blueprint is a CSS framework, which aims to cut down on your CSS development time. It gives you a solid CSS foundation to build your project on top of, with an easy-to-use grid, sensible typography, and even a stylesheet for printing.

Saturday, January 26, 2008

Screen Pixel Ruler

http://www.wonderwebware.com/screen-ruler/download.html

Greybox Smart Windows - A pop-up window that doesn't suck.

http://orangoo.com/labs/GreyBox/

GreyBox can be used to display websites, images and other content in a beautiful way. (Lightbox effect)

Why use GreyBox:

* It does not conflict with pop-up blockers
* It's only 22 KB!
* It's super easy to setup
* It's super easy to use
* You can easily alter the style as it is controlled through CSS

Usage

ThickBox

ThickBox is a webpage UI dialog widget written in JavaScript on top of the jQuery library. Its function is to show a single image, multiple images, inline content, iframed content, or content served through AJAX in a hybrid modal.

http://jquery.com/demo/thickbox/

Wednesday, January 2, 2008