Artikel ini adalah artikel cermin dari terjemahan mesin, silakan klik di sini untuk melompat ke artikel aslinya.

Melihat: 6158|Jawab: 0

Menambahkan karakter secara massal sebelum setiap baris dalam file teks txt

[Salin tautan]
Diposting pada 04/02/2015 13.25.21 | | |

'=================================================================
set arg=WScript.Arguments
jika arg.count=0 maka
msgbox "Usage:"&vbcrlf&vbcrlf&" Jangan jalankan skrip ini secara langsung, cukup seret dan lepas satu atau lebih file yang perlu diganti dengan string ke file skrip ini.
wscript.quit
berakhir jika
atur fso=wscript.createobject("scripting.filesystemobject")
atur fr=fso.opentextfile(arg(0),1)
atur fw=fso.createtextfile("temp.txt",2)
data=inputbox("Silakan masukkan karakter yang Anda tambahkan sebelum baris:")
melakukan
fw.writeline(data&fr.readline)
loop sampai fr.atendofstream
fr.tutup
fw.tutup
atur fr=fso.opentextfile("temp.txt",1)
atur fw=fso.createtextfile(arg(0),2)
melakukan
fw.writeline(fr.readline)
loop sampai fr.atendofstream
fr.tutup
fw.tutup
fso.deletefile("temp.txt")
'====================================================
Salin konten di atas dan simpan sebagai file VBS, seret dokumen yang ingin Anda modifikasi ke file VBS ini, Anda dapat memasukkan karakter yang ingin Anda tambahkan, konfirmasi setelah masuk, buka dokumen Anda, dan Anda akan menemukan bahwa setiap baris Anda telah menambahkan data yang baru saja Anda masukkan.




Mantan:Ada tiga pernyataan penyisipan SQL umum
Depan:Mengimpor file txt ke SQL SERVER 2008
Sanggahan:
Semua perangkat lunak, materi pemrograman, atau artikel yang diterbitkan oleh Code Farmer Network hanya untuk tujuan pembelajaran dan penelitian; Konten di atas tidak boleh digunakan untuk tujuan komersial atau ilegal, jika tidak, pengguna akan menanggung semua konsekuensi. Informasi di situs ini berasal dari Internet, dan sengketa hak cipta tidak ada hubungannya dengan situs ini. Anda harus sepenuhnya menghapus konten di atas dari komputer Anda dalam waktu 24 jam setelah pengunduhan. Jika Anda menyukai program ini, harap dukung perangkat lunak asli, pembelian pendaftaran, dan dapatkan layanan asli yang lebih baik. Jika ada pelanggaran, silakan hubungi kami melalui email.

Mail To:help@itsvse.com