2013年12月26日 星期四
2013年12月25日 星期三
[VBNET]啟動外部應用程式
System.Diagnostics.Process.Start
Dim processInfo As New System.Diagnostics.ProcessStartInfo()
processInfo.FileName = "C:\WINDOWS\system32\net"
processInfo.Arguments = "use X: \\MYPC\Folder /USER:MYPC\TEST P@ssw0rd"
System.Diagnostics.Process.Start(processInfo)
2013年12月19日 星期四
cisco switch備份
安裝SolarWinds-TFTP-Server (免費)
預設路徑 C:\Program Files (x86)\SolarWinds\TFTP Server\TFTPServer.exe
介面點選file→configure 可設定檔案儲存路徑 預設port69
telnet → cisco switch
→ 輸入密碼
→ en
→ 輸入密碼
→ copy startup-config tftp
→ 輸入 server ip(sftp host ip)
→ 輸入備份檔名(Destination filename)
完成後 即可在host端C:\TFTP-Root\ 找到該備份檔 (可用記事本讀取內容)
預設路徑 C:\Program Files (x86)\SolarWinds\TFTP Server\TFTPServer.exe
介面點選file→configure 可設定檔案儲存路徑 預設port69
telnet → cisco switch
→ 輸入密碼
→ en
→ 輸入密碼
→ copy startup-config tftp
→ 輸入 server ip(sftp host ip)
→ 輸入備份檔名(Destination filename)
完成後 即可在host端C:\TFTP-Root\ 找到該備份檔 (可用記事本讀取內容)
2013年11月13日 星期三
2013年11月6日 星期三
[VBNET]讀出app.config
app.config設定
讀設定值
讀設定值
Dim port As Integer = System.Configuration.ConfigurationManager.AppSettings.Item("port")
2013年10月30日 星期三
[程式開發]Socket範例
http://msdn.microsoft.com/zh-tw/library/fx6588te(v=vs.110).aspx
其中
要改
其中
Dim ipHostInfo As IPHostEntry = Dns.Resolve(Dns.GetHostName())
要改
Dim ipHostInfo As IPHostEntry = Dns.GetHostEntry(Dns.GetHostName())
2013年10月29日 星期二
2013年9月30日 星期一
[ASP.NET]搭配jQuery Impromptu 元件 實做轉址功能
因為一般的alert警告訊息有點虛弱
上網找了一個好用的jQuery元件Impromptu
(特別注意因為他有使用到後來的jQuery新語法 記得更新引用的jQuery版本)
假日研究了下搭配ASP.NET的運用
流程：按下送出後→出現提示→進行轉址
當使用者按下確認→使用submit option進行轉址
當使用者按下右上角的關閉鈕→使用close option進行轉址
如果有需要取得按的是哪個按鈕 可以從value來判斷
function(event[, value, message, formVals]){}
前端程式碼
後端程式碼
上網找了一個好用的jQuery元件Impromptu
(特別注意因為他有使用到後來的jQuery新語法 記得更新引用的jQuery版本)
假日研究了下搭配ASP.NET的運用
流程：按下送出後→出現提示→進行轉址
當使用者按下確認→使用submit option進行轉址
當使用者按下右上角的關閉鈕→使用close option進行轉址
如果有需要取得按的是哪個按鈕 可以從value來判斷
function(event[, value, message, formVals]){}
前端程式碼
function showmsg(msg) {
$.prompt(msg
, { buttons: { 確認: true },
close: function(e) {
window.location = 'xxxx.aspx';
}
,
submit: function(e) {
window.location = 'xxxx.aspx';
}
});
return false;
}
後端程式碼
Partial Public Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim alert As String = "showmsg('Hello World');"
Page.ClientScript.RegisterStartupScript(Me.GetType(), "PopupScript", alert, True)
End Sub
End Class
2013年9月27日 星期五
[ASP.NET]URL 編碼型式資料無效
一頁面送了預設超過1000個欄位的資料時 出現的錯誤
需在web.config加大 不過加大會有安全上的疑慮....考慮改用分頁
<appSettings>
<add key="aspnet:MaxHttpCollectionKeys" value="2500" />
appSettings>
2013年9月14日 星期六
2013年9月13日 星期五
[SQL筆記]date & time
今天將公司一些TABLE 原本用到datetime，但只存日期或時間的欄位，
改成date 或 time 型態，減少資料儲存空間，特別注意到的是time可指定小數位
由time(0)~time(7) 根據小數位的不同佔的空間也不同，如果不需儲存0.1秒之後的時間 用time(0)即可
MSDN參考:
http://technet.microsoft.com/zh-tw/library/bb677243.aspx
時間表示:
改成date 或 time 型態，減少資料儲存空間，特別注意到的是time可指定小數位
由time(0)~time(7) 根據小數位的不同佔的空間也不同，如果不需儲存0.1秒之後的時間 用time(0)即可
MSDN參考:
http://technet.microsoft.com/zh-tw/library/bb677243.aspx
時間表示:
2013年9月12日 星期四
[jQuery]好用的Client端Table Pagination搭配ASP.NET
引用來源 : http://neoalchemy.org/tablePagination.html
引用方式
可調整選項(稍微翻譯一下XD)
firstArrow - 移至第一頁圖檔
prevArrow - 移至上一頁圖檔
lastArrow - 移至最後一頁圖檔
nextArrow - 移至下一頁圖檔
topNav - Boolean - 分頁選單出現位置. 預設: false(表的下方)
rowsPerPage - Number - 一頁要有幾行. 預設: 5
currPage - Number - 分頁預設在第N頁. 預設: 1
optionsForRows - Array - 每一分頁要顯示幾行資料. 預設: [5,10,25,50,100]
ignoreRows - Array - 忽略"行". 當你有空白行資料 會搞亂分頁計數可用. Default: []
ASP.NET 使用table元件 標頭在換頁時不消失
引用方式
#tablePagination
{
background-color: #DCDCDC;
font-size: 0.8em;
height: 20px;
padding: 0px 5px;
}
#tablePagination_paginater
{
margin-left: auto;
margin-right: auto;
}
#tablePagination img
{
padding: 0px 2px;
}
#tablePagination_perPage
{
float: left;
}
#tablePagination_paginater
{
float: right;
}
$(document).ready(function() {
var options = {
currPage: 1,
//ignoreRows: $('tbody tr:odd', $('#tbCardData')),
optionsForRows: [5, 10, 25, 50, 100],
rowsPerPage: 100,
firstArrow: (new Image()).src = "/images/firstBlue.gif",
prevArrow: (new Image()).src = "/images/prevBlue.gif",
lastArrow: (new Image()).src = "/images/lastBlue.gif",
nextArrow: (new Image()).src = "/images/nextBlue.gif",
topNav: true
}
$('table[id=tb1]').tablePagination(options);
});
可調整選項(稍微翻譯一下XD)
firstArrow - 移至第一頁圖檔
prevArrow - 移至上一頁圖檔
lastArrow - 移至最後一頁圖檔
nextArrow - 移至下一頁圖檔
topNav - Boolean - 分頁選單出現位置. 預設: false(表的下方)
rowsPerPage - Number - 一頁要有幾行. 預設: 5
currPage - Number - 分頁預設在第N頁. 預設: 1
optionsForRows - Array - 每一分頁要顯示幾行資料. 預設: [5,10,25,50,100]
ignoreRows - Array - 忽略"行". 當你有空白行資料 會搞亂分頁計數可用. Default: []
ASP.NET 使用table元件 標頭在換頁時不消失
=
2013年9月2日 星期一
JS Date
var d = new Date(2013,12,1);
alert(d);
會是2014年1月.......
原因
alert(d);
會是2014年1月.......
原因
month[0]="January";
month[1]="February";
month[2]="March";
month[3]="April";
month[4]="May";
month[5]="June";
month[6]="July";
month[7]="August";
month[8]="September";
month[9]="October";
month[10]="November";
month[11]="December";
2013年8月30日 星期五
web.config connection string 特殊字元當密碼
connectionString="Server=dbsrv;User ID=myDbUser;Password=somepass"word" " = " http://en.wikipedia.org/wiki/Character_entity#XML_character_entity_references
2013年8月13日 星期二
[VB.Net]SqlDataAdapter的逾時設定
Using da As SqlDataAdapter = New SqlDataAdapter(_strSql, conn)
da.SelectCommand.CommandTimeout = 120
da.Fill(ds, "testDs")
End Using
2013年8月8日 星期四
[VisualBasic] Unicode碼 轉Unicode中文字
fso.CreateTextFile("c:\test.txt", True, True) 'unicode文字檔
fso.OpenTextFile("c:\test.txt", ForAppending, True, TristateTrue)
str:待轉換的中文+Unicode編碼
fso.OpenTextFile("c:\test.txt", ForAppending, True, TristateTrue)
str:待轉換的中文+Unicode編碼
Function Convert(str)
str = Trim(str)
Dim name As String
If InStr(1, str, "&#", 0) > 0 Then '表示有待轉換的編碼
Dim tempArr, tempArr2
tempArr = Split(str, "&#")
For i = 0 To UBound(tempArr)
If IsNumeric(tempArr(i)) Then
name = name & ChrW(tempArr(i))
Else
tempArr2 = Split(tempArr(i), ";")
For j = 0 To UBound(tempArr2)
If IsNumeric(tempArr2(j)) Then
name = name & ChrW(tempArr2(j))
Else
name = name & tempArr2(j)
End If
Next
End If
Next
Convert = name
Else
Convert = str
End If
End Function
2013年7月11日 星期四
改變 IIS 6 上傳___下載限制
Step1. 先停止 IIS 服務 開始 → 系統管理工具 → 服務 停止 IIS Admin Service & World Wide Web Publishing Service Step2. 編輯 C:\windows\system32\inetsrv\metabase.xml Step3. 修改上傳限制 尋找 AspMaxRequestEntityAllowed 預設 204800 (200KB) 改成所需大小(1024*200)。 修改下載限制 尋找 AspBufferingLimit 預設 4194304 (4MB) 改成所需大小(1024*1024*4)。 Step4. 重新啟動 IIS Admin Service & World Wide Web Publishing Service 服務_________ 完成。
2013年6月11日 星期二
2013年6月10日 星期一
JS下拉選單 在IE10底下無作用
公司網頁用的JS下拉選單
在新的Browser IE10、chrome無作用 上網查了
obj.filters.alpha.opacity 新版已不支援此種寫法
filter:alpha(Opacity=20);
在新的Browser IE10、chrome無作用 上網查了
obj.filters.alpha.opacity 新版已不支援此種寫法
filter:alpha(Opacity=20);
var IE = getIEver();
if (IE) {
obj.filters.alpha.opacity += 5
} else {
obj.style.opacity += 5;
}
function getIEver() {
if (navigator.appName == "Microsoft Internet Explorer" && navigator.appVersion.split(";")[1].replace(/[ ]/g, "") == "MSIE6.0") {
return 1;
} else if (navigator.appName == "Microsoft Internet Explorer" && navigator.appVersion.split(";")[1].replace(/[ ]/g, "") == "MSIE7.0") {
return 1;
} else if (navigator.appName == "Microsoft Internet Explorer" && navigator.appVersion.split(";")[1].replace(/[ ]/g, "") == "MSIE8.0") {
return 1;
} else if (navigator.appName == "Microsoft Internet Explorer" && navigator.appVersion.split(";")[1].replace(/[ ]/g, "") == "MSIE9.0") {
return 1;
}
return 0;
}
2013年5月25日 星期六
2013年5月16日 星期四
2013年4月29日 星期一
SQL run script file
C:\MyFolder\MyScript.sql -o C:\MyFolder\MyOutput.rpt
參考:http://msdn.microsoft.com/en-us/library/aa213087(v=sql.80).aspx osql -E -i
參考:http://msdn.microsoft.com/en-us/library/aa213087(v=sql.80).aspx osql -E -i
訂閱：
文章 (Atom)