who'd want to such a crazy thing? well me. i just wanted to find the dirtiest quickest way with zero overhead to push data directly into a sharepoint list. i found a few articles with some information about this, but the closest one was this one using jquery. so here it is in vbscript with no extra libraries or anything (except what is build into windows which is still plenty). one cool thing about this is it was quite faster than the .net method i posted previously. i attribute that to building a nice web reference with all the different methods in it and all that overhead. i'm sure i could speed it up, and i didn't try just using this method in .net which would probably be faster too. this doesn't require .net or a compiler though and i can just open the file to fiddle if i need to so nifty for my current purpose. =D

and yes, i know there are better ways to concat text. i'm done fiddling with this for now so we'll all live =P code is commented below i believe sufficiently. it's not too complicated =P

'some vars
url = "http://<yoursitegoeshere>/_vti_bin/Lists.asmx"
list = "<yourlistgoeshere>" 'can be GUID too
id = 2
title = wscript.arguments(0)

'the caml
batch = "<Batch OnError='Continue' ListVersion='1'>"
batch = batch + " <Method ID='1' Cmd='New'>"
batch = batch + "  <Field Name='ID'>New</Field>"
batch = batch + "  <Field Name='Title'>" & title & "</Field>"
batch = batch + "  <Field Name='AssignedTo'>" & id & "</Field>"
batch = batch + " </Method>"
batch = batch + "</Batch>"

'soap wrapper plus some info in body
request =  "<?xml version='1.0' encoding='utf-8'?>"
request =  request + "<soap:Envelope xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance'"
request =  request + "            xmlns:xsd='http://www.w3.org/2001/XMLSchema'"
request =  request + "            xmlns:soap='http://schemas.xmlsoap.org/soap/envelope/'>"
request =  request + "  <soap:Body>"
request =  request + "  <UpdateListItems xmlns='http://schemas.microsoft.com/sharepoint/soap/'>"
request =  request + "              <listName>" & list & "</listName>"
request =  request + "              <updates>" & batch & "</updates>"
request =  request + "  </UpdateListItems>"
request =  request + "  </soap:Body>"
request =  request + "</soap:Envelope>"

'post it up and look at the response
with CreateObject("Microsoft.XMLHTTP")
 .open "POST", url, False
 .setRequestHeader "Content-Type", "text/xml; charset=utf-8"
 .setRequestHeader "SOAPAction","http://schemas.microsoft.com/sharepoint/soap/UpdateListItems"
 .send request
 wscript.echo .responseText
end with

so you try to wack a crazy user who created stuff under his/her own schema in a sql database, but when you try to drop the schema, you get the evil 'something is owned' message. then you look and see they have a billion objects. booo..... oh well, not too big of a deal. you can use something similar to below. the below just drops syn's but you can put a case statement in the build portion based on type and drop everything you need to. obviously this can be tweaked some based on your taste. 

declare @s nvarchar(max)

while (
	select
		count(*)
	from
		sys.objects obj
		join sys.schemas s
			on (s.schema_id=obj.schema_id)
	where
		s.name='') > 0
begin
	select top 1
		@s = N'DROP SYNONYM [].[' + obj.name + ']'
	from
		sys.objects obj
		join sys.schemas s
			on (s.schema_id=obj.schema_id)
	where
		s.name=''
	print @s
	execute(@s)
end

net use * /d /y

the /y is undocumented as far as i can see. it provides a 'Y' when it asks if you're sure.

installed this the other day on a few different computers. great experiences so far for me. i used the guide at the following url. http://www.bwana.org/2009/01/11/how-to-install-windows-7-beta-from-a-usb-drive-to-an-hp-mini-1000-without-vista/

in reply to dennis' comment on my last post on this little thing (http://drowningintechnicaldebt.com/blogs/royashbrook/archive/2009/01/21/create-a-custom-sendto-item-to-process-files.aspx), here's the way to do this with powershell

1. make sure you have powershell installed and working
2. create script somewhere with text: foreach ($i in $args) {move-item $i $i.Replace(".mod", ".mpeg")}
3. create a shortcut in the sendto folder that has the command of '[pathtopowershell.exe] -noexit [pathtoscript]
4. enjoy!

i was only renaming certain files to certain other files (MOD to MPEG), but obviously you can customize this however you see fit. i had my batch before set not to exit so i could see what was up, but you could take out the -noexit if you wanted it to just run and bail. powershell definitely is more powerful, but IMO still a huge pain for most stuff i would use it for. if most admins invested the amount of time it would take to ramp up using powershell into learning existing tools, they probably wouldn't need it. i'm definitely enjoying playing with it though. here are some references i used:

http://blogs.msdn.com/mikeormond/archive/2008/01/20/powershell-batch-rename.aspx
http://blogs.msdn.com/powershell/
http://sandbox.manning.com/thread.jspa?messageID=62599
http://powershell.wik.is/Cmdlet_Help/Microsoft.PowerShell.Management/Rename-Item
http://adrianba.net/archive/2007/10/29/rename-item-and-square-brackets-in-powershell-no--literalpath.aspx

Login and show basic info

require 'soap/wsdlDriver'
require 'digest/md5'
u = "user"
p = Digest::MD5.hexdigest("password")
ua = {"user_name" => u,"password" => p}
wsdl = "http://yoursite.com/soap.php?wsdl"

#create soap
s = SOAP::WSDLDriverFactory.new(wsdl).create_rpc_driver

#uncomment this line for debugging. saves xml packets to files
#s.wiredump_file_base = "soapresult"

#create session
ss = s.login(ua,nil)

#check for login errors
if ss.error.number.to_i != 0 

	#status message
	puts "failed to login - #{ss.error.description}"
	
	#exit program
	exit
else

	#get id
	sid = ss['id']

	#get current user id
	uid = s.get_user_id(sid)
	
	#status message
	puts "logged in to session #{sid} as #{u} (#{uid}) "
	
	#logout
	s.logout(sid)
	
	#status message
	puts "logged out"
end

Adding an account
After login, you can create new accounts using the code :
        module_name = "Accounts"    
        name_value_list =  [ { "name" => "name", "value" => "theworldcompany" },
                             { "name" => "phone_office", "value" => "01234567" } ]
        s.set_entry(sid, module_name,  name_value_list)

so i have this video camera and it records files to mod files. i dunno why. mod's are just like mpegs. you can just rename them and open them. i don't know why they aren't just saved as mpegs, but whatever. so i got tired of dropping out to dos and just renaming the files so i could review them. i could also i'm sure find a way to just register mod files with my computer but bah. i decided to just create a custom sendto item so i could just mass rename them. so if you want to rename a bunch of files or really do anything to a bunch of files, you can create a file called whateveryouwant.cmd and put it in your sendto folder inside of your profile folder. then i used the text:

:loop
ren %1 *.mpeg
shift
if %1. NEQ . goto loop

in the file. you could replace the ren command with whatever you want. %1 should be the current file. anyway, if anyone finds this and it doesn't make sense, just comment and i'll clarify.