2012年4月14日 星期六

文章整併計畫


http://jufmore.blogspot.com/
考量文章量數,且Google blogger有良好的分類功能,今日才了解其使用功能,故之後文章將整併到http://jufmore.blogspot.com/

2011年7月15日 星期五

ASP.NET要新增書本內範例資料庫的方法

如果直接改範例中的連結字串會發生很多問題

所以先建立新的【sqlstring】的連結元件

確定該元件可以連結後

直接將其連結字串複製回原本字串內

然後把建立的新字串移除

因為我是裝sql2008 R2 原本有sql Server Express
發生問題如下:
1.這一版的 SQL Server 不支援使用者執行個體登入旗標。此連接將會關閉。
2.建立連接至 SQL Server 時,發生網路相關或執行個體特定的錯誤。找不到或無法存取伺服器。確認執行個名稱是否正確,以及 SQL Server 是否設定為允許遠端連線。 (provider: 共用記憶提供者, error: 40 - 無法開啟至 SQL Server 的連接)

2011年7月13日 星期三

ASP.NET_SWFUpload_套件問題

我在
http://www.dotblogs.com.tw/puma/archive/2008/07/16/4504.aspx
看到這套件的使用方法
我現在看到的是版本2.5版
他那時是2.1版
他在Default.aspx的檔案教大家加上一個按鈕並且呼叫函式swfu.getfiles()
但是我怎麼按按鈕都沒反應
後來大家說是因為flash player10改成不能直接跳出視窗
然後搞了老半天...!@#$%$^&*
就這樣經過將近2-3天的時間
我一直再用這個..
最後我發現一件很想哭的事情..
因為我看PHP那邊都可以DEMO
CSS樣式也很好看..後來原來是CSS樣式沒套用上..
CSS跟JAVASCRIP的檔案[取用路徑]沒調整到...
等我調用好了之後....按鈕也不用加....
他自然就寫在swf的檔案裡了...整個就可以用了...
好累...終於用好了...

2011年7月5日 星期二

Trim清不掉的空白...請注意

參考網址
http://social.msdn.microsoft.com/Forums/zh-HK/232/thread/69a90d86-3448-4c1f-9c62-62ec9f2b42bf

通常會出現這種不可控制的狀況時,應該是裡面不小心加了不可見字元,例如 vbTab / vbNewLine / vbLf / vbCr / BackSpace /或結束字元ch(0) ... 等。

ASP.NET Insert CSV 檔案資料 至 Microsoft SQL

參考網址
http://vectus.wordpress.com/2011/02/13/asp-net-insert-csv-%E6%AA%94%E6%A1%88%E8%B3%87%E6%96%99-%E8%87%B3-microsoft-sql/

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

Dim reader As System.IO.StreamReader = New System.IO.StreamReader(Me.FileUpload1.PostedFile.InputStream)
Dim csv As String = reader.ReadToEnd()
InsertCSVtoDataTable(csv)

End Sub

Public Sub InsertCSVtoDataTable(ByVal csvContent As String)

Dim sr As New System.IO.StringReader(csvContent)
Dim line As String = Nothing
Dim i As Integer = 0
Dim p As String()

line = sr.ReadLine()
p = line.Split(",")
i = 0

If i = 0 Then
For Each s As String In p
i += 1
Next
End If

i = 1
line = sr.ReadLine()

While line IsNot Nothing
p = line.Split(",")
Insert_Record(p, i)
line = sr.ReadLine()
i += 1
End While

End Sub

Private Sub Insert_Record(ByVal AAA As String(), ByVal BBB As Integer)
Dim connectionString1 As String = "Data Source=.\SqlExpress; Initial Catalog=aa; Integrated Security=SSPI"
Dim con1 As SqlConnection = New SqlConnection(connectionString1)
con1.Open()

Dim SqlString1 As String = "INSERT INTO TABLE2 (a, b, c, d, e) VALUES (" & _
BBB.ToString & ", '" & AAA(0).ToString.Trim & "', '" & _
AAA(1).ToString.Trim & "', '" & AAA(2).ToString.Trim & "', '" & _
AAA(3).ToString.Trim & "')"
Dim cmd1 As SqlCommand = New SqlCommand(SqlString1, con1)
cmd1.ExecuteNonQuery()
con1.Close()
End Sub

透過ADO.Recrodset取得文字資料庫csv的方法

參考網址
http://blog.blueshop.com.tw/topcat/archive/2005/08/08/11356.aspx


可以透過RecordSet來直接讀取csv檔
不過要特別注意讀取後,兩個豆號間如果沒有資料
那麼那個欄位會是【null】
以下是範例程式

--------------------------------------------------------------------------------

Dim conn as Object
Dim rs as Object
Dim FilePath as String
Dim SQLTXT1 as String

Set conn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")

FilePath = "D:\TEMP"

conn.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};DBQ=" & FilePath & ";Extensions=asc,csv,tab,txt;Persist Security Info=False"

With rs
.CursorType=2
.LockType=3
.CursorLocation=3
.ActiveConnection=conn
End With

SQLTXT1 = "SELECT * FROM ABC.csv"
RS.Open SQLTXT1

2011年7月4日 星期一

web.config 不支援關鍵字: 'provider' for ASP.NET

"ConnectionString 中未指定 OLE DB 提供者。正確範例為 Provider=SQLOLEDB;。"

將Provider=SQLOLEDB;放進程式碼中的字串裡面如connnectStr as string

不要直接把 Provider=SQLOLEDB; 放在 web.config的檔案裡

參考資料:
http://hoolihome.blogspot.com/2010/03/provider.html