下記のように１日後の日付を常に表示するときは
どこを変えればいいのでしょうか？
<TD>※明日は<script language="JavaScript">
<!--
// 訪問日表示
now = new Date();
year = now.getYear(); if (year < 2000) year = year + 1900;
month = now.getMonth()+1;
day = now.getDate();
wk = new Array("日","月","火","水","木","金","土");
document.write("有効期限："+year+"年"+month+"月"+day+"日");
// -->
</script>
下にHPのソースを表示させるプログラムがあります。
これで表示されたソースの中からある文字を検索したいのですが、それってできますか？どうしたらいいんでしょうか、お願いします。
Private Sub Command1_Click()
Command1.Enabled = False
Text1.Text = GetSource()
Command1.Enabled = True
End Sub
Function GetSource() As String
Dim strBuf As String
Dim strURL As String
strURL = "http://www.microsoft.com/japan/ms.htm"
strBuf = Inet1.OpenURL(strURL)
GetSource = strBuf
End Function
下にHPのソースを表示させるプログラムがあります。
これで表示されたソースの中からある文字を検索したいのですが、それってできますか？どうしたらいいんでしょうか、お願いします。
Private Sub Command1_Click()
Command1.Enabled = False
Text1.Text = GetSource()
Command1.Enabled = True
End Sub
Function GetSource() As String
Dim strBuf As String
Dim strURL As String
strURL = "http://www.microsoft.com/japan/ms.htm"
strBuf = Inet1.OpenURL(strURL)
GetSource = strBuf
End Function
下にHPのソースを表示させるプログラムがあります。
これで表示されたソースの中からある文字を検索したいのですが、それってできますか？どうしたらいいんでしょうか、お願いします。
Private Sub Command1_Click()
Command1.Enabled = False
Text1.Text = GetSource()
Command1.Enabled = True
End Sub
Function GetSource() As String
Dim strBuf As String
Dim strURL As String
strURL = "http://www.microsoft.com/japan/ms.htm"
strBuf = Inet1.OpenURL(strURL)
GetSource = strBuf
End Function
下にHPのソースを表示させるプログラムがあります。
これで表示されたソースの中からある文字を検索したいのですが、それってできますか？どうしたらいいんでしょうか、お願いします。
Private Sub Command1_Click()
Command1.Enabled = False
Text1.Text = GetSource()
Command1.Enabled = True
End Sub
Function GetSource() As String
Dim strBuf As String
Dim strURL As String
strURL = "http://www.microsoft.com/japan/ms.htm"
strBuf = Inet1.OpenURL(strURL)
GetSource = strBuf
End Function
