VB.NET 類別.屬性.方法


Public Class ClassName

'資料欄位
Private DataField_Name as String
'方法
Public Function MethodName()

End Function
'屬性
Public Property DataFieldName() As String
Get
Return DataField_Name
End Get
Set(ByVal value As String)
DataField_Name = value
End Set
End Property

End Class


PHP的物件導向 類別.屬性.方法



class ClassName{

private $DataField_Name; /*資料欄位*/

public function MethodName(){ /*方法*/

}
/*屬 性*/
public function get_DataField_Name(){
return $this->DataField_Name;
}
public function set_DataField_Name($x) {
$this->DataField_Name = $x;
}
}
?>



Java 的物件導向 類別.屬性.方法


public class ClassName{

private int DataField_Name; //資料欄位

public void Method_Name(){ //方法

}

//屬性
public void set_DataField_Name(int i){

DataField_Name = i;
}

public int get_DataField_Name(){
return DataField_Name;
}

}


安裝 Xdebug

以PHP5.2.6，Windows為例︰
1． 登錄www.xdebug.org，在首頁進入"Obtaining"，選擇 "Xdebug 2.0.4"，底下有”5.2 VC 6 ”將該文件下載

2． 將下載的php_xdebug-2.0.4-5.2.8.dll放到php5 \ ext目錄底下，重命名為php_xdebug.dll
3． 編輯php.ini，加入下面幾行︰
Extension = php_xdebug.dll
[ Xdebug ]
xdebug.profiler_enable=on
xdebug.trace_output_dir="自己定一個目錄" 例如 : C:\TEMP 你想要放置Xdebug輸出資料文件的目錄
xdebug.profiler_output_dir="自己定一個目錄"

4． 重啟Apache
5． 寫一個test.php，內容為，如果輸出的內容中有看到xdebug，說明安裝配置成功。

使用Web Services來建立存取圖片之服務

以下是使用 VB.NET 2005 所寫的 Web Sevices範例程式

• 將圖片上傳至Services端

- Service端程式

Imports System.WebImports System.Web.Services

Imports System.Web.Services.Protocols

Imports System.io

_

Public Function GetPic(ByVal str As String) As Byte()

Dim filename As String = Me.Server.MapPath(".") & "\\" & str & "." & "Jpg"

Dim fs As FileStream = New FileStream(filename, FileMode.Open)

Dim br As BinaryReader = New BinaryReader(fs)

Dim pic As Byte() = br.ReadBytes(fs.Length)

br.Close()

fs.Close()

Return pic

End Function

-Client端程式

Imports System.IO

Imports System.Drawing

Imports System.Drawing.Imaging

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim s As New WebReference2.Service

Dim STR As String = "123"

Dim path As String = Server.MapPath(".")

Dim msImage As MemoryStream = New MemoryStream(s.GetPic("2"))
Dim imgFile As Image = Image.FromStream(msImage)
ImgFile.Save(path + "\" + STR + ".jpg", ImageFormat.Jpeg)
Me.Image1.ImageUrl = "~/" & STR & ".jpg" '在Web上放入一個Image控制項來顯示所取回的圖片
imgFile.Dispose()

End Sub

• 將向服務端請求提供圖片的服務

上面的例子顛倒過來寫就是向服務端請求提供圖片的服務. 有空在繼續放.

要存檔處的資料夾 權限記得要打開給ASP.NET和本機使用儲存.

HTTP 狀態 401 : Unauthorized

最近開始用了 Server2003的IIS 6.0發現比之前XP的IIS5.0複雜更多...

在執行Visaul Studio Web專案部署時碰到了"HTTP 狀態 401 : Unauthorized" 這個問題...

花了一點時間才解決...

將解決方法記錄下來 ...

在專案的資料夾權限中加入三個必要角色

1. ASPNET
2. NetWork Service
3. IUSR_本機名稱

就可以解決掉權限不足的問題了

ORACLE : 列數限制查詢,SQL SELECT ROWNUM

在MySQL中可以使用'LIMIT'做列數限制查詢，且列數的查詢能夠在排序後才進行。如下:
Select * from some_table limit 8, 3 ;
只取得查詢結果中，第8列開始的3列資料。

然而，在Oracle當中則沒有LIMIT可以使用。需要使用ROWNUM來限制查詢結果所取回的列數，如下：

SELECT 　* 　FROM 　HELP 　WHERE 　ROWNUM < 9 　minus 　SELECT * FROM HELP WHERE ROWNUM < 3;

如此，所取回的資料列數為3,4,5,6,7,8列，取回編列數小餘9的列數並且捨棄掉編列數小於3的號碼。唯一缺點在於，不能夠直接使用Order by排序後再取所要的列數範圍，而需要另外建立View或是加入其他副查詢條件。

VS.NET 2005 ASP.NET TextBox控制項 處理換行與空格的問題

在使用ASP.NET時使用textBox控制項，定然免不了碰到換行與空格自動被忽略掉的情形：

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

Label1.Text = TextBox1.Text

End Sub

處理方式有兩種，一是使用Html Editor控制項，讓使用者在輸入後處理出來的字串為html原碼。另一種則直接在後端程式中對空白字或換行，進行字串替換，避免空白與換行被忽略掉。程式碼如下：

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim 使用者輸入 As String

　　使用者輸入 = TextBox1.Text.Replace(" ", " &_nbsp;") '真正在使用時須把&_nbsp的"_"拿掉

　　使用者輸入 = 使用者輸入.Replace(vbCrLf, " ")

　　Label1.Text = 使用者輸入

End Sub

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

ORA-01036: 變數名稱 號碼無效

　　

此錯誤為，開發環境為ORACLE10g & VisualStudio.NET2005，此問題主為輸入參數錯誤。解決方法：
１.先檢查Command所下的SQL指令中是否每個參數前方都有加入冒號，如：Insert into member(member_id)values(:member_id)

2.接下來檢查是否每個Parameter所載入的位置都正確。不僅僅是順序，不能夠有多一個參數或是少一個參數，否則都會造成錯誤，例如下：

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

# VB.NET Code

Dim cmdQuery As String
cmdQuery = "INSERT INTO

EXAM_QUESTION

(EXAM_QUESTION_NO,EXAM_QUESTION_CONTEXT,SELECTION_1,SELECTION_2,

SELECTION_3,SELECTION_4,EXAM_ANS,EXAM_SCOPE_ID,TEACHER_ID)

VALUES('B0000001',:A,:B,:C,:D,:E,:F,:G,:H)"

Dim cmd As OracleCommand = New OracleCommand
cmd.Connection = con
cmd.CommandText = cmdQuery

Dim p2 As OracleParameter = New OracleParameter("A", OracleDbType.Varchar2, 500)

p2.Direction = Data.ParameterDirection.Input
p2.Value = EQ.ExamQuestionContext
cmd.Parameters.Add(p2)

Dim p3 As OracleParameter = New OracleParameter("B", OracleDbType.Varchar2, 100)

p3.Direction = Data.ParameterDirection.Input
p3.Value = EQ.Selection1
cmd.Parameters.Add(p3)

Dim p4 As OracleParameter = New OracleParameter("C", OracleDbType.Varchar2, 100)

p4.Direction = Data.ParameterDirection.Input
p4.Value = EQ.Selection2
cmd.Parameters.Add(p4)

Dim p5 As OracleParameter = New OracleParameter("D", OracleDbType.Varchar2, 100)

p5.Direction = Data.ParameterDirection.Input
p5.Value = EQ.Selection3
cmd.Parameters.Add(p5)

Dim p6 As OracleParameter = New OracleParameter("E", OracleDbType.Varchar2, 100)

p6.Direction = Data.ParameterDirection.Input
p6.Value = EQ.Selection4
cmd.Parameters.Add(p6)

Dim p7 As OracleParameter = New OracleParameter("F", OracleDbType.Varchar2, 5)

p7.Direction = Data.ParameterDirection.Input
p7.Value = EQ.ExamAns.ToString
cmd.Parameters.Add(p7)

Dim p8 As OracleParameter = New OracleParameter("G", OracleDbType.Varchar2, 10)

p8.Direction = Data.ParameterDirection.Input
p8.Value = ES.ExamScopeID
cmd.Parameters.Add(p8)

Dim p9 As OracleParameter = New OracleParameter("H", OracleDbType.Varchar2, 10)

p9.Direction = Data.ParameterDirection.Input
p9.Value = T.TeacherID
cmd.Parameters.Add(p9)
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

Visual Studio .Net 2005 Express Download & Oracle Database Express Download

　　如果你本身熱愛.NET系列的開發軟體(VB.NET,C#)等等..。有良好IDE環境的開發工具，但是又苦於只是學生沒辦法弄到正式版的開發軟體。那這些連結應該對你會有很大的幫助。

• Visual Basic Express 　VB.NET的免費個人版本


• Visual C# Express C#.NET的免費個人版本


• Visual Web Developer Expess Web開發工具


• Visual C++ Express C++.NET的免費個人版本


• SQL Server 2005 Express SQL Server2005的個人免費版
  

　　SQL SERVER 2005 XE 的資料庫基本上功能也非常不錯，但還是較正式版的多了一些限制，比方說資料庫容量有設上限，我記得沒錯好像是1G還是4G。不過就學生做專案或是中小型企業的需求而言已經非常足夠了。也支援2005標準版的直接升級。所以不會有太大問題。

　　微軟這個版本資料庫主要和兩個免費的個人版資料庫競爭，MySQL以及Oracle 10G XE。以下是Oracle10G XE版的連結：

• Oracle Database 10g R2 Express Edition

　　和Oracle 10G Enterprise版本差異在於個人版沒有支援ORDBMS(物件關聯)以及硬碟儲存容量限制在4G記憶體支援到1G。不過我個人是覺得OracleXE網頁版的IDE開發環境非常方便。要下載ORACLE資料庫或相關套件，必須先免費加入OTN會員。另外，ORACLE也提供JDEVELOPER的J2EE開發平台，如果你是JAVA的愛好者。可以試試看直接和ORACLE DATABASE來整合開發。