恋するフォーチュンクッキー富山県バージョン。
落ちがあるのかないのかよくわからないのですが、最後にみんなでずっこけています。落ちがないという落ちかもしれません。
https://www.youtube.com/watch?v=-oG4uW_iqmw&feature=youtu.be
# mv /etc/localtime{,.org}
# ln -s /usr/share/zoneinfo/Asia/Tokyo /etc/localtime
sudo umount /dev/sdb1
sudo dd if=/path/to/file.iso of=/dev/sdb bs=1M
ところが、これをやると一見書き込めたかのようですが、このUSBからブートすることができませんでした。それどころか、このUSBメモリの中身を見ることさえできませんでした。
そこで今度は以下のように入力してUSBメモリにISOファイルを書き込んでみました。
sudo umount /dev/sdb1
sudo cat /path/to/file.iso > /dev/sdb1
すると、書き込んだUSBメモリの中身をファイラーから見ることができました。しかしながらやはりそのUSBメモリからブートすることはできませんでした。なお、使用したiso ファイルは、Windows7 のインストール用DVDから、抽出したiso ファイルです。
Sub send_mysql() | |
Dim int_sheets_no | |
int_sheets_no = 1 | |
int_line = 2 | |
Do While Worksheets(int_sheets_no).Range("E" & int_line).Value <> "" | |
str_name = Worksheets(int_sheets_no).Range("B" & int_line).Value | |
str_zip = Worksheets(int_sheets_no).Range("C" & int_line).Value | |
str_address = Worksheets(int_sheets_no).Range("D" & int_line).Value | |
str_tel = Worksheets(int_sheets_no).Range("E" & int_line).Value | |
str_fax = Worksheets(int_sheets_no).Range("F" & int_line).Value | |
Call add_mysql(str_name, str_zip, str_address, str_tel, str_fax) | |
int_line = int_line + 1 | |
Loop | |
Set xlbook = Nothing | |
Set xlApp = Nothing | |
End Sub | |
Function add_mysql(str_name, str_zip, str_address, str_tel, str_fax) | |
Set conn_1 = CreateObject("ADODB.Connection") | |
Set rs_1 = CreateObject("ADODB.Recordset") | |
conn_1.Open "Driver={MySQL ODBC 5.2w Driver};server=192.168.2.100;" & _ | |
"database=user; uid=user; pwd=user;" | |
intCount = 0 | |
rs_1.Open "select * from tel where tel like '" & str_tel & "'", conn_1, 3, 3 | |
If rs_1.EOF <> True And rs_1.BOF <> True Then | |
'MsgBox "already exists " & vbCrLf & str_tel | |
Else | |
rs_1.addnew | |
rs_1.Fields("name") = str_name | |
rs_1.Fields("zip") = str_zip | |
rs_1.Fields("address") = str_address | |
rs_1.Fields("tel") = str_tel | |
rs_1.Fields("fax") = str_fax | |
rs_1.Update | |
rs_1.Close | |
MsgBox "add " & vbCrLf & str_tel | |
End If | |
conn_1.Close | |
End Function | |