重覆排列

Public Class Form1

    Dim ans(19) As String

    Dim str1 = ""

    Dim inStr = ""

    Dim ctr = 0

    Sub enu(d, n, m)

        Dim i As Integer

        If d = n Then

            For i = 0 To n - 1

                str1 = str1 & ans(i) & " "

            Next

            str1 = str1 & vbNewLine

            ctr = ctr + 1

            Return

        End If

        For i = 1 To m

            ans(d) = Mid(inStr, i, 1)

            enu(d + 1, n, m)

        Next

    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Dim n, m As Integer

        inStr = "ABc"

        n = 3

        m = Len(inStr)

        enu(0, n, m)

        MsgBox(str1 & vbNewLine & "共" & ctr & "個")

        End

    End Sub

End Class

Kill Process

'Kill process
Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Timer1.Interval = 5000
        Timer1.Enabled = True
    End Sub

    Sub killProcess(processName)
        Dim process1 As Process()
        process1 = Process.GetProcessesByName(processName)
        For Each proces As Process In process1
            proces.Kill()
        Next
    End Sub

    Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
        System.Diagnostics.Process.Start("iexplore")
    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        Call killProcess("iexplore")
        Call killProcess("mspaint")
    End Sub
End Class

最長共同子序列

#include <iostream>
#include <string>
using namespace std;
#define LEN 1000
int table[LEN + 1][LEN + 1];
char seq1[LEN + 1], seq2[LEN + 1];
string cs="";
int lcs_length(int s1Len, int s2Len)
{
    int i, j;  
    memset(table, 0, sizeof(table));

    for(i = 1; i <= s1Len; ++i) {
        for(j = 1; j <= s2Len; ++j) {
            if(seq1[i - 1] == seq2[j - 1])
            {   
     table[i][j] = table[i - 1][j - 1] + 1;
     cs=cs + seq1[i - 1];
   }
            else
     table[i][j] = max(table[i - 1][j],table[i][j - 1]);
        }
   }
   return table[s1Len][s2Len];
}
int main()
{
   
    while (cin >>seq1 >> seq2)
    {
        int s1Len = strlen(seq1), s2Len = strlen(seq2);
  cout << lcs_length(s1Len, s2Len) << "--" << cs << endl;
    }
   
    return 0;
}

用中華電信 p874 架設區網 -- 有線Ping 不到無線

 

Google上查了好久，結論是

1. 第4埠是切割給MOD用的。
2. 防火牆檔掉。

Ref: 請問p874要怎架設區網 - 其他網路設備與技術 - Mobile01

DNS 資源記錄 (Resource Record)

區域內所建立的資料稱為資源記錄（RR, Resource Record），常用的種類有（如下圖）：

─ 主機記錄 (A Record, Address Record)：記錄電腦主機的 DNS 名稱與 IP 位址的對應關係。

─ 別名記錄 (CNAME Record, Canonical Name Record)：電腦主機的另一個名稱，一部電腦主機可以擁有多個不同的別名。

─ 郵件交換程式記錄 (MX Record, Mail eXchange Record)：記錄指定網域的郵件伺服器 DNS 名稱。

─ 啟動授權記錄 (SOA Record, Start Of Authority Record)：在區域建立時，系統會自動新增一個啟動授權記錄，記錄此區域的資料更新由哪一個 DNS 伺服器負責。

─ 名稱伺服器記錄 (NS Record, Name Server Record)： 記錄 DNS 資料庫中有哪些電腦是名稱伺服器，不可以用 IP 位址表示，一個區域可以有多筆名稱伺服器紀錄。

資料來源：http://192.192.75.66/elearn/winserver/

 

網路系統管理